Fix a typo in the setting of the *QUERY* variable.

Ignore-this: b506b71489624bc76a753439a0dc377

darcs-hash:43462b950ec9f6df3e2d46b64b561b2383cc4adc

1 files changed, 1 insertions, 1 deletions

diff --git a/main.lisp b/main.lisp
index b0e8274..8546a33 100644
--- a/main.lisp
+++ b/main.lisp
@@ -51,7 +51,7 @@
                                 (mapcan #'(lambda (param)
                                             (list (keywordify param)
                                                   (http-query-parameter param)))
-                                        (http-query-parameter-list))) '())
+                                        (http-query-parameter-list))))
          (*post-number*     (parse-integer (or (first *subpath*)
                                                (getf *query* :id ""))
                                            :junk-allowed t  #|| :radix 12 ||#))