diff --git a/DOMTEST b/DOMTEST
index 5dfe3d9..613aeb3 100644
--- a/DOMTEST
+++ b/DOMTEST
@@ -614,7 +614,6 @@ implementationAttribute signed not supported, skipping test
 584/808 documentimportnode17.xml
 585/808 documentimportnode18.xml
 586/808 documentimportnode19.xml
-TEST FAILED: The slot DOM-IMPL::NAME is unbound in the object #<DOM-IMPL::ENTITY {xxxxxxxx}>.
 587/808 documentimportnode20.xml
 implementationAttribute expandEntityReferences not supported, skipping test
 588/808 documentimportnode21.xml
@@ -878,4 +877,4 @@ TEST FAILED: expected exception INUSE_ATTRIBUTE_ERR
 803/808 setNamedItemNS04.xml
 804/808 setNamedItemNS05.xml
 805/808 systemId01.xml
-21/763 tests failed; 45 tests were skipped
\ No newline at end of file
+20/763 tests failed; 45 tests were skipped
\ No newline at end of file
diff --git a/dom/dom-impl.lisp b/dom/dom-impl.lisp
index 1e65489..de44a6f 100644
--- a/dom/dom-impl.lisp
+++ b/dom/dom-impl.lisp
@@ -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)))