summaryrefslogtreecommitdiff
path: root/mulkcms-hunchentoot.lisp
diff options
context:
space:
mode:
authorMatthias Andreas Benkard <code@mail.matthias.benkard.de>2011-03-13 20:57:12 +0100
committerMatthias Andreas Benkard <code@mail.matthias.benkard.de>2011-03-13 20:57:12 +0100
commit315838f9f666ab0196ff1f27c9604b5a2f2bce50 (patch)
tree047541407cd8c5f52c2c779d5ae18f264d923b43 /mulkcms-hunchentoot.lisp
parente7eb24f3526bd806ace3d9e151e1e3542be2e33c (diff)
Support article editing.
Diffstat (limited to 'mulkcms-hunchentoot.lisp')
-rw-r--r--mulkcms-hunchentoot.lisp2
1 files changed, 1 insertions, 1 deletions
diff --git a/mulkcms-hunchentoot.lisp b/mulkcms-hunchentoot.lisp
index 0b5cb87..befdc09 100644
--- a/mulkcms-hunchentoot.lisp
+++ b/mulkcms-hunchentoot.lisp
@@ -19,7 +19,7 @@
(defun dispatch-mulkcms-request (request)
(let* ((relative-path (subseq (script-name request) 1)))
- (mulkcms::find-request-handler relative-path (get-parameters*))))
+ (mulkcms::find-request-handler relative-path (append (get-parameters*) (post-parameters*)))))
(defun setup-handlers ()
(setq *dispatch-table*