cl-rw

Layered streams for Common Lisp
git clone https://logand.com/git/cl-rw.git/
Log | Files | Refs

commit 546217ca2ba01f96dc4bb7d88e7e47e667b61f5a
parent 55a594413ed0166f163bc437651931db5e86e739
Author: Tomas Hlavaty <tom@logand.com>
Date:   Sun, 13 Oct 2013 18:10:21 +0200

forgot to fix http-redirect

Diffstat:
Mui.lisp | 2+-
1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/ui.lisp b/ui.lisp @@ -118,7 +118,7 @@ (parse36 (subseq k 1))))) (funcall dispatch kk v :arg1)))) (funcall dispatch aid nil :arg0) - `(:redirect ,(funcall construct sid (pretty36 aid) *renv*))) + (http-redirect (funcall construct sid (pretty36 aid) *renv*))) (:get (funcall dispatch aid nil :arg0) (funcall clear)