Update of /project/cxml/cvsroot/cxml/klacks In directory clnet:/tmp/cvs-serv29486

Modified Files: klacks-impl.lisp Log Message: do what the documentation says and allow an octets argument to make-source

--- /project/cxml/cvsroot/cxml/klacks/klacks-impl.lisp 2007/05/06 11:28:13 1.10 +++ /project/cxml/cvsroot/cxml/klacks/klacks-impl.lisp 2007/06/16 09:41:22 1.11 @@ -162,7 +162,9 @@ :entity-name "main document" :entity-kind :main :uri nil)) - (apply #'make-source xstream args))))) + (apply #'make-source xstream args))) + (array + (make-source (cxml::make-octet-input-stream input)))))

(defun %make-source (input &key validate dtd root entity-resolver disallow-internal-subset