Update of /project/s-xml/cvsroot/s-xml/src In directory common-lisp.net:/tmp/cvs-serv9479/src Modified Files: lxml-dom.lisp sxml-dom.lisp Log Message: removed some unused format arguments Date: Wed Aug 17 10:06:01 2005 Author: scaekenberghe Index: s-xml/src/lxml-dom.lisp diff -u s-xml/src/lxml-dom.lisp:1.1.1.1 s-xml/src/lxml-dom.lisp:1.2 --- s-xml/src/lxml-dom.lisp:1.1.1.1 Mon Jun 7 20:49:56 2004 +++ s-xml/src/lxml-dom.lisp Wed Aug 17 10:06:01 2005 @@ -1,6 +1,6 @@ ;;;; -*- mode: lisp -*- ;;;; -;;;; $Id: lxml-dom.lisp,v 1.1.1.1 2004/06/07 18:49:56 scaekenberghe Exp $ +;;;; $Id: lxml-dom.lisp,v 1.2 2005/08/17 08:06:01 scaekenberghe Exp $ ;;;; ;;;; LXML implementation of the generic DOM parser and printer. ;;;; @@ -77,7 +77,7 @@ (terpri stream) (dotimes (i (* 2 (1- level))) (write-char #\space stream))))) (format stream "</~a>" tag)) - (format stream "/>" tag)))) + (format stream "/>")))) (t (error "Input not recognized as LXML ~s" dom)))) ;;;; eof Index: s-xml/src/sxml-dom.lisp diff -u s-xml/src/sxml-dom.lisp:1.1.1.1 s-xml/src/sxml-dom.lisp:1.2 --- s-xml/src/sxml-dom.lisp:1.1.1.1 Mon Jun 7 20:49:57 2004 +++ s-xml/src/sxml-dom.lisp Wed Aug 17 10:06:01 2005 @@ -1,6 +1,6 @@ ;;;; -*- mode: lisp -*- ;;;; -;;;; $Id: sxml-dom.lisp,v 1.1.1.1 2004/06/07 18:49:57 scaekenberghe Exp $ +;;;; $Id: sxml-dom.lisp,v 1.2 2005/08/17 08:06:01 scaekenberghe Exp $ ;;;; ;;;; LXML implementation of the generic DOM parser and printer. ;;;; @@ -71,7 +71,7 @@ (terpri stream) (dotimes (i (* 2 (1- level))) (write-char #\space stream))))) (format stream "</~a>" tag)) - (format stream "/>" tag)))) + (format stream "/>")))) (t (error "Input not recognized as SXML ~s" dom)))) ;;;; eof