Re: DSSSL/XSL: act on an attribute and then do the usual thing?

[Sam Steingold <sds@gnu.org>]

> * In message <3EBFD1E4.1000607@kosek.cz>
> * On the subject of "Re: DSSSL/XSL: act on an attribute and then do the   usual thing?"
> * Sent on Mon, 12 May 2003 18:55:00 +0200
> * Honorable Jirka Kosek <jirka@kosek.cz> writes:
>
> Sam Steingold wrote:
> 
> > The bottom line is : how do I write:
> > (element quote
> >   (let ((role (attribute-string (normalize "role"))))
> >     (make element gi: "STRONG" attributes: (list (list "CLASS" role))
> >           now-transform-the-original-quote-the-standard-way-as-if-there-was-no-role)))
> 
> use next-match instead of
> now-transform-the-original-quote-the-standard-way-as-if-there-was-no-role

(element quote
   (let ((role (attribute-string (normalize "role"))))
     (case role
       (("pacakge")
        (make element gi: "STRONG" attributes: (list (list "CLASS" role))
              (next-match)))
       (else (next-match)))))

does not work.

> > <xsl:template match="quote[@role = 'package']">
> >  <strong class="{@role}"><xsl:now-transform-the-original-quote-the-standard-way-as-if-there-was-no-role/></strong>
> > </xsl:template>
> 
> Use <xsl:apply-imports/> instead of
> <xsl:now-transform-the-original-quote-the-standard-way-as-if-there-was-no-role/>

yep, works!  thanks!

what I need is something like CALL-NEXT-METHOD in CL, so `next-match'
is more intuitive than `apply-imports'... :-)

-- 
Sam Steingold (http://www.podval.org/~sds) running RedHat9 GNU/Linux
<http://www.camera.org> <http://www.iris.org.il> <http://www.memri.org/>
<http://www.mideasttruth.com/> <http://www.palestine-central.com/links.html>
In the race between idiot-proof software and idiots, the idiots are winning.