(import-node attribute)

This commit is contained in:
dlichteblau
2005-12-04 21:44:06 +00:00
parent a8cfbee393
commit 0ef0e0be0f
2 changed files with 6 additions and 3 deletions

View File

@ -555,7 +555,6 @@ implementationAttribute signed not supported, skipping test
525/808 attrgetownerelement02.xml
526/808 attrgetownerelement03.xml
527/808 attrgetownerelement04.xml
TEST FAILED: The slot DOM-IMPL::OWNER-ELEMENT is unbound in the object #<DOM-IMPL::ATTRIBUTE emp:zone="CANADA" {xxxxxxxx}>.
528/808 attrgetownerelement05.xml
TEST FAILED: The assertion (DOMTEST::EQUALSP DOMTEST-TESTS::|ownerElementName|
#(97 100 100 114 101 115 115)
@ -960,4 +959,4 @@ TEST FAILED: expected exception INUSE_ATTRIBUTE_ERR
803/808 setNamedItemNS04.xml
804/808 setNamedItemNS05.xml
805/808 systemId01.xml
63/763 tests failed; 45 tests were skipped
62/763 tests failed; 45 tests were skipped

View File

@ -1238,7 +1238,11 @@
(defmethod dom:import-node ((document document) (node attribute) deep)
(declare (ignore deep))
(import-node-internal 'attribute document node t :name (dom:name node)))
(import-node-internal 'attribute
document node
t
:name (dom:name node)
:owner-element nil))
(defmethod dom:import-node ((document document) (node document-fragment) deep)
(import-node-internal 'document-fragment document node deep))