Fixed condition class in not-wellformed document with the STP builder
This commit is contained in:
committed by
David Lichteblau
parent
4c11d5b68a
commit
77d915505e
@ -693,7 +693,7 @@
|
||||
|
||||
(defmethod sax:xml-base ((parser cxml-parser))
|
||||
(let ((uri (car (base-stack (slot-value parser 'ctx)))))
|
||||
(if (stringp uri)
|
||||
(if (or (null uri) (stringp uri))
|
||||
uri
|
||||
(puri:render-uri uri nil))))
|
||||
|
||||
|
||||
Reference in New Issue
Block a user