r10915: add lml2-tests.asd file

[lml2.git] / base.lisp

diff --git a/base.lisp b/base.lisp
index ecfd2792acf2cae51df83376542d717e0ceb7ebb..7054761ea88fbf77243537dc57faacfb4d0faa46 100644 (file)
--- 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)