[cxml-cvs] CVS cxml/dom

[dlichteblau]

Update of /project/cxml/cvsroot/cxml/dom
In directory clnet:/tmp/cvs-serv27264/dom

Modified Files:
	dom-builder.lisp 
Log Message:
hax:%want-strings-p


--- /project/cxml/cvsroot/cxml/dom/dom-builder.lisp	2007/10/14 17:50:11	1.15
+++ /project/cxml/cvsroot/cxml/dom/dom-builder.lisp	2007/10/21 17:07:23	1.16
@@ -21,6 +21,10 @@
    (internal-subset             :accessor internal-subset)
    (text-buffer   :initform nil :accessor text-buffer)))
 
+#+(and rune-is-integer (not cxml-system::utf8dom-file))
+(defmethod hax:%want-strings-p ((handler dom-builder))
+  nil)
+
 (defun make-dom-builder ()
   (make-instance 'dom-builder))