Commit d43d9996 authored by david's avatar david

Revision: cxml--devel--1.0--patch-100

Archive: david@knowledgetools.de--cxml
Creator: David Lichteblau <david@knowledgetools.de>
Date: Mon Feb  9 17:31:39 CET 2004
Standard-date: 2004-02-09 16:31:39 GMT
Modified-files: xml/xml-parse.lisp
New-patches: david@knowledgetools.de--cxml/cxml--devel--1.0--patch-100
Summary: Die XML Deklaration ist keine Processing Instruction.

Die XML Deklaration ist keine Processing Instruction.
parent f55ccb88
......@@ -1966,12 +1966,6 @@
(cond ((eq (peek-token input) :xml-pi)
(let ((hd (parse-xml-pi (cdr (nth-value 1 (peek-token input))) t)))
(setup-encoding input hd))
;; FIXME: Ceci n'est pas un pi. Should probably go away.
;; (hmot 30/06/03)
(sax:processing-instruction
*handler*
(car (nth-value 1 (peek-token input)))
(cdr (nth-value 1 (peek-token input))))
(read-token input)))
(set-full-speed input)
;; Misc*
......
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