[cxml-cvs] CVS cxml/xml

[dlichteblau]

Update of /project/cxml/cvsroot/cxml/xml
In directory clnet:/tmp/cvs-serv8224/xml

Modified Files:
	unparse.lisp 
Log Message:
fixed CDATA serialization, thanks to Donavon Keithley


--- /project/cxml/cvsroot/cxml/xml/unparse.lisp	2006/02/17 12:53:19	1.9
+++ /project/cxml/cvsroot/cxml/xml/unparse.lisp	2006/05/05 09:05:22	1.10
@@ -545,6 +545,7 @@
   value)
 
 (defun cdata (data)
+  (maybe-emit-start-tag)
   (sax:start-cdata *sink*)
   (sax:characters *sink* (rod data))
   (sax:end-cdata *sink*)