X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=2%2Fbase.lisp;h=7054761ea88fbf77243537dc57faacfb4d0faa46;hb=58ba71d155d44f6033cc85a377e5d4c1004a99bd;hp=ecfd2792acf2cae51df83376542d717e0ceb7ebb;hpb=e8e6eb250b87c885a5107bc59b0b8a89453c3907;p=lml.git

diff --git a/2/base.lisp b/2/base.lisp
index ecfd279..7054761 100644
--- a/2/base.lisp
+++ b/2/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)