X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=base.lisp;h=7054761ea88fbf77243537dc57faacfb4d0faa46;hb=3af8ba4d01c6331525f183ffdacb68b632a22ed4;hp=ecfd2792acf2cae51df83376542d717e0ceb7ebb;hpb=1c71d374606cbbc92dbffdea09292c2acf0755af;p=lml2.git

diff --git a/base.lisp b/base.lisp
index ecfd279..7054761 100644
--- a/base.lisp
+++ b/base.lisp
@@ -79,7 +79,7 @@
 (defmacro html-file-page ((out-file &key (format :xhtml11))
 			  &body body)
   `(with-open-file (*html-stream*
-		    (lml-file-name ,out-file :output)
+		    (lml-file-name ',out-file :output)
 		    :direction :output
 		    :if-exists :supersede)
      (dtd-prologue ,format)