Commit df1a997f authored by david's avatar david

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

Creator: David Lichteblau <>
Date: Wed Feb  4 17:31:44 CET 2004
Standard-date: 2004-02-04 16:31:44 GMT
Modified-files: xml/string-dom.lisp
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