Commit df1a997f authored by david's avatar david

Revision: cxml--devel--1.0--patch-38

Archive: david@knowledgetools.de--cxml
Creator: David Lichteblau <david@knowledgetools.de>
Date: Wed Feb  4 17:31:44 CET 2004
Standard-date: 2004-02-04 16:31:44 GMT
Modified-files: xml/string-dom.lisp
New-patches: david@knowledgetools.de--cxml/cxml--devel--1.0--patch-38
Summary: diverse setter nachgetragen

diverse setter nachgetragen
parent 9145e2ab
......@@ -29,9 +29,15 @@
(defun string-dom:node-name (node) (rod-to-string (cdom:node-name node)))
(defun string-dom:node-value (node) (rod-to-string (cdom:node-value node)))
(defun (setf string-dom:data) (newval node)
(setf (cdom:data node) newval))
(defun (setf string-dom:value) (newval node)
(setf (cdom:value node) newval))
(defun (setf string-dom:node-value) (newval node)
(setf (cdom:node-value node) newval))
(defun string-dom:substring-data (node offset count)
(rod-to-string (cdom:substring-data node offset count)))
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment