r8293: change argument order

diff --git a/xml-utils.lisp b/xml-utils.lisp
index a9d641e4c6ce3eeaa078963303e6ff3daff1cd6b..6ef3bb98fd8a69c94b995efcee8ece0a6575d51b 100644 (file)
--- 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)