(import-node attribute)

2005-12-04 21:44:06 +00:00
parent a8cfbee393
commit 0ef0e0be0f
2 changed files with 6 additions and 3 deletions
--- a/dom/dom-impl.lisp
+++ b/dom/dom-impl.lisp
@ -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))