From de09121dd7981aa2f52611e1d46114f05af6355c Mon Sep 17 00:00:00 2001 From: dlichteblau Date: Sun, 4 Dec 2005 23:23:24 +0000 Subject: [PATCH] attributknotennamespace beim klonen mitnehmen --- DOMTEST | 4 +--- dom/dom-impl.lisp | 3 +++ 2 files changed, 4 insertions(+), 3 deletions(-) diff --git a/DOMTEST b/DOMTEST index fa03c69..ce6454c 100644 --- a/DOMTEST +++ b/DOMTEST @@ -601,7 +601,6 @@ implementationAttribute signed not supported, skipping test 571/808 documentimportnode03.xml 572/808 documentimportnode04.xml 573/808 documentimportnode05.xml -TEST FAILED: The slot DOM-IMPL::NAMESPACE-URI is unbound in the object #. 574/808 documentimportnode06.xml TEST FAILED: There is no applicable method for the generic function # @@ -675,7 +674,6 @@ TEST FAILED: The assertion DOMTEST-TESTS::|success| failed. 618/808 elementremoveattributens01.xml 619/808 elementsetattributenodens01.xml 620/808 elementsetattributenodens02.xml -TEST FAILED: The slot DOM-IMPL::NAMESPACE-URI is unbound in the object #. 621/808 elementsetattributenodens03.xml TEST FAILED: expected exception INUSE_ATTRIBUTE_ERR 622/808 elementsetattributenodens04.xml @@ -915,4 +913,4 @@ TEST FAILED: expected exception INUSE_ATTRIBUTE_ERR 803/808 setNamedItemNS04.xml 804/808 setNamedItemNS05.xml 805/808 systemId01.xml -34/763 tests failed; 45 tests were skipped \ No newline at end of file +32/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 e2b835a..b0568b2 100644 --- a/dom/dom-impl.lisp +++ b/dom/dom-impl.lisp @@ -1254,6 +1254,9 @@ document node t :name (dom:name node) + :namespace-uri (dom:namespace-uri node) + :local-name (dom:local-name node) + :prefix (dom:prefix node) :owner-element nil)) (defmethod dom:import-node ((document document) (node document-fragment) deep)