[cxml-devel] Patch: extid-using-catalog: make-extid requires a URI object.

[Douglas Crosher]

o extid-using-catalog: convert the URI string returned by 'resolve-extid
   into the 'uri object required by 'make-extid.

-------------- next part --------------
o extid-using-catalog: convert the URI string returned by 'resolve-extid
  into the 'uri object required by 'make-extid.

Index: xml/xml-parse.lisp
===================================================================
RCS file: /project/cxml/cvsroot/cxml/xml/xml-parse.lisp,v
retrieving revision 1.67
diff -u -r1.67 xml-parse.lisp
--- xml/xml-parse.lisp	4 Mar 2007 21:04:13 -0000	1.67
+++ xml/xml-parse.lisp	13 Jun 2007 08:15:07 -0000
@@ -2481,7 +2496,7 @@
                             (extid-system extid)
                             *catalog*)))
         (if sysid
-            (make-extid nil sysid)
+            (make-extid nil (safe-parse-uri sysid))
             extid))
       extid))