Commit 9145e2ab authored by david's avatar david

Revision: cxml--devel--1.0--patch-34

Archive: david@knowledgetools.de--cxml
Creator: David Lichteblau <david@knowledgetools.de>
Date: Wed Feb  4 15:33:54 CET 2004
Standard-date: 2004-02-04 14:33:54 GMT
Modified-files: xml/string-dom.lisp
New-patches: david@knowledgetools.de--cxml/cxml--devel--1.0--patch-34
Summary: (setf value) nachgetragen

(setf value) nachgetragen
parent 07fcebde
......@@ -29,6 +29,9 @@
(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:value) (newval node)
(setf (cdom: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