Update of /project/cxml/cvsroot/cxml/xml In directory common-lisp.net:/tmp/cvs-serv27086/xml Modified Files: xml-parse.lisp Log Message: -ibm/not-wf/P14/ibm14n01.xml [not-wf?] FAILED: - well-formedness violation not detected -[ - Tests CharData. The content of the element "student" contains the - character "[[>". - ] Date: Sun Nov 27 01:36:48 2005 Author: dlichteblau Index: cxml/xml/xml-parse.lisp diff -u cxml/xml/xml-parse.lisp:1.16 cxml/xml/xml-parse.lisp:1.17 --- cxml/xml/xml-parse.lisp:1.16 Sun Nov 27 01:33:55 2005 +++ cxml/xml/xml-parse.lisp Sun Nov 27 01:36:47 2005 @@ -2671,6 +2671,8 @@ (p/content input)) ((:CDATA) (consume-token input) + (when (search #"]]>" sem) + (wf-error "']]>' not allowed in CharData")) (validate-characters *ctx* sem) (sax:characters (handler *ctx*) sem) (p/content input))