[cxml-cvs] CVS update: cxml/dom/dom-impl.lisp

[David Lichteblau]

Update of /project/cxml/cvsroot/cxml/dom
In directory common-lisp.net:/tmp/cvs-serv3219/dom

Modified Files:
	dom-impl.lisp 
Log Message:
 586/808 documentimportnode19.xml
-TEST FAILED: The slot DOM-IMPL::NAME is unbound in the object #<DOM-IMPL::ENTIT
Y {xxxxxxxx}>.

Date: Sun Dec 11 19:17:32 2005
Author: dlichteblau

Index: cxml/dom/dom-impl.lisp
diff -u cxml/dom/dom-impl.lisp:1.20 cxml/dom/dom-impl.lisp:1.21
--- cxml/dom/dom-impl.lisp:1.20	Sun Dec 11 19:13:04 2005
+++ cxml/dom/dom-impl.lisp	Sun Dec 11 19:17:31 2005
@@ -1292,6 +1292,7 @@
 
 (defmethod dom:import-node ((document document) (node entity) deep)
   (import-node-internal 'entity document node deep
+			:name (dom:name node)
                         :public-id (dom:public-id node)
                         :system-id (dom:system-id node)
                         :notation-name (dom:notation-name node)))