Update of /project/cxml/cvsroot/cxml/dom In directory common-lisp.net:/tmp/cvs-serv9777/dom
Modified Files: dom-impl.lisp Log Message: tolles OO ist das.
747/808 nodehasattributes02.xml -TEST FAILED: There is no applicable method for the generic function - #<STANDARD-GENERIC-FUNCTION DOM:HAS-ATTRIBUTES (1)> - when called with arguments - (#<DOM-IMPL::DOCUMENT-TYPE {xxxxxxxx}>).
Date: Sun Dec 11 20:38:10 2005 Author: dlichteblau
Index: cxml/dom/dom-impl.lisp diff -u cxml/dom/dom-impl.lisp:1.25 cxml/dom/dom-impl.lisp:1.26 --- cxml/dom/dom-impl.lisp:1.25 Sun Dec 11 20:35:05 2005 +++ cxml/dom/dom-impl.lisp Sun Dec 11 20:38:10 2005 @@ -448,6 +448,9 @@
;;; Node
+(defmethod dom:has-attributes ((element node)) + nil) + (defmethod dom:is-supported ((node node) feature version) (dom:has-feature 'implementation feature version))