Commit f2d9273b authored by david's avatar david
Browse files

Revision: cxml--devel--1.0--patch-4

Creator: David Lichteblau <>
Date: Thu Jan  8 22:54:29 CET 2004
Standard-date: 2004-01-08 21:54:29 GMT
New-files: xml/.arch-ids/
Modified-files: cxml.asd xml/dom-builder.lisp
    xml/dom-impl.lisp xml/package.lisp
Summary: renamed dom to cdom, added string-dom

  - renamed package dom to cdom
  - use cl-package-aliases to access the package under the name "dom" anyway
  - added string-dom, which wraps around cdom and converts rods to strings
  - fixed import-node in dom-impl
parent ca0456a7
(defpackage :dom-impl
(:use :glisp))
(:use :glisp)
(:alias (:cdom :dom)))
(in-package :dom-impl)
......@@ -527,7 +528,8 @@
(let ((result (apply #'make-instance class :owner document initargs)))
(when deep
(dolist (child (dom:child-nodes node))
(dom:append-child result (dom:import-node document child t))))))
(dom:append-child result (dom:import-node document child t))))
(defmethod dom:import-node ((document document) (node attribute) deep)
(declare (ignore deep))
......@@ -10,6 +10,7 @@
(:alias (:cdom :dom))
;; xstreams
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