X-Git-Url: http://git.kpe.io/?p=kmrcl.git;a=blobdiff_plain;f=xml-utils.lisp;h=6ef3bb98fd8a69c94b995efcee8ece0a6575d51b;hp=a9d641e4c6ce3eeaa078963303e6ff3daff1cd6b;hb=76d158a36bde53452e8724b2202dd3ccf6c2da40;hpb=1738d41053dae41266d5740385be9aac03a864ad

diff --git a/xml-utils.lisp b/xml-utils.lisp
index a9d641e..6ef3bb9 100644
--- a/xml-utils.lisp
+++ b/xml-utils.lisp
@@ -162,7 +162,7 @@ and position of character following end tag."
 		     entities))))
 
 
-(defun sgml-header-stream (stream format &key entities (encoding "iso-8859-1") standalone (version "1.0")
+(defun sgml-header-stream (format stream &key entities (encoding "iso-8859-1") standalone (version "1.0")
 			  top-element (availability "PUBLIC") registered organization (type "DTD")
 			   label (language "EN") url)
   (when (in format :xhtml :xhtml11 :xhtml10-strict :xhtml10-transitional :xhtml10-frameset :xml :docbook)