785/808 removeNamedItemNS03.xml

-TEST FAILED: expected exception NO_MODIFICATION_ALLOWED_ERR
This commit is contained in:
dlichteblau
2005-12-04 21:22:47 +00:00
parent a8d0f330a0
commit 0233822821
2 changed files with 2 additions and 2 deletions

View File

@ -1070,7 +1070,6 @@ TEST FAILED: There is no applicable method for the generic function
783/808 removeNamedItemNS01.xml
784/808 removeNamedItemNS02.xml
785/808 removeNamedItemNS03.xml
TEST FAILED: expected exception NO_MODIFICATION_ALLOWED_ERR
786/808 setAttributeNS01.xml
787/808 setAttributeNS02.xml
788/808 setAttributeNS03.xml
@ -1115,4 +1114,4 @@ TEST FAILED: There is no applicable method for the generic function
(NIL).
804/808 setNamedItemNS05.xml
805/808 systemId01.xml
102/763 tests failed; 45 tests were skipped
101/763 tests failed; 45 tests were skipped

View File

@ -1138,6 +1138,7 @@
(labels ((walk (n)
(setf (slot-value n 'read-only-p) t)
(when (dom:element-p n)
(setf (slot-value (dom:attributes n) 'read-only-p) t)
(map nil #'walk (dom:items (dom:attributes n))))
(map nil #'walk (dom:child-nodes n))))
(walk instance)))