Re: Getting the contents of an element

[Chris Maden <crism@xxxxxxx>]

[Georg Rehm]
> (define (get-contents gi)
>         (process-node-list 
>                 (node-list-first 
>                         (select-elements 
>                                 (descendants (ancestor *top-gi*)) gi))))
> 
> ; Top-Level Element
> 
> (element text
>         (make sequence
>                 (make document-type [...]
>                 (make element gi: "HTML"
>                         (make element gi: "HEAD"
>                                 (make element gi: "TITLE"
>                                         (get-contents "TEXTID")))

(get-contents) looks for an ancestor of the current node called
"TEXT".  From <text> itself, you won't find any such ancestor, and so
this all falls apart.

Instead of (ancestor *top-gi*), try (grove-root (current-node)).

-Chris
-- 
<!NOTATION SGML.Geek PUBLIC "-//GCA//NOTATION SGML Geek//EN">
<!ENTITY crism PUBLIC "-//O'Reilly//NONSGML Christopher R. Maden//EN"
"<URL>http://www.oreilly.com/ <TEL>+1.617.499.7487 <FAX>+1.617.661.1116
<USMAIL>90 Sherman Street, Cambridge, MA 02140 USA" NDATA SGML.Geek>


 DSSSList info and archive:  http://www.mulberrytech.com/dsssl/dssslist