OSCL/CXML
2
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

785/808 removeNamedItemNS03.xml

Browse Source 
-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
Download Patch File Download Diff File Expand all files Collapse all files

3
DOMTEST
View File

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

1
dom/dom-impl.lisp
View File

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