Re: Again with the System Identifiers

[Chris Maden <crism@xxxxxxxxxxx>]

[Joerg Wittenberger]
> I believe you want to use (entity-generated-system-id entref)
> instead of your (entity-system-id entref).
> 
> Hope this helps.

Immensely.  Thanks a lot.

Here's the code I ended up using; it's simple, but maybe it could drop
into the cookbook:

(let* ((entref (attribute-string (norm "entityref")))
       (fileref (if entref
                    (if (entity-system-id entref
                                          (current-node))
                        (entity-system-id entref
                                          (current-node))
                        (entity-generated-system-id entref
                                                    (current-node)))
                    (attribute-string (norm "fileref")))))

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


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