[cxml-cvs] CVS cxml/xml

[dlichteblau]

Update of /project/cxml/cvsroot/cxml/xml
In directory clnet:/tmp/cvs-serv4145/xml

Modified Files:
	xml-parse.lisp 
Log Message:
die letzten paar nicht-ascii zeichen raus, macht das leben einfacher


--- /project/cxml/cvsroot/cxml/xml/xml-parse.lisp	2006/08/20 13:58:31	1.62
+++ /project/cxml/cvsroot/cxml/xml/xml-parse.lisp	2006/09/10 14:55:30	1.63
@@ -7,11 +7,11 @@
 ;;;    Author: David Lichteblau <david at lichteblau.com>
 ;;;   License: Lisp-LGPL (See file COPYING for details).
 ;;; ---------------------------------------------------------------------------
-;;;  © copyright 1999 by Gilbert Baumann
-;;;  © copyright 2003 by Henrik Motakef
-;;;  © copyright 2004 knowledgeTools Int. GmbH
-;;;  © copyright 2004 David Lichteblau
-;;;  © copyright 2005 David Lichteblau
+;;;  (c) copyright 1999 by Gilbert Baumann
+;;;  (c) copyright 2003 by Henrik Motakef
+;;;  (c) copyright 2004 knowledgeTools Int. GmbH
+;;;  (c) copyright 2004 David Lichteblau
+;;;  (c) copyright 2005 David Lichteblau
 
 ;;; This library is free software; you can redistribute it and/or
 ;;; modify it under the terms of the GNU Library General Public
@@ -3177,7 +3177,7 @@
       (cond ((%= rptr fptr)
              ;; underflow -- hmm inject the scratch-pad with what we
              ;; read and continue, while using read-rune and collecting
-             ;; d.h. besser wäre hier auch while-reading zu benutzen.
+             ;; d.h. besser waere hier auch while-reading zu benutzen.
              (setf (xstream-read-ptr ,input) rptr)
              (multiple-value-setq (,res ,res-start ,res-end)
                (with-rune-collector/raw (collect)