aboutsummaryrefslogtreecommitdiffstats
path: root/scrumli.lisp
diff options
context:
space:
mode:
authorGravatar Tom Willemse2013-07-07 22:36:51 +0200
committerGravatar Tom Willemse2013-07-07 22:36:51 +0200
commitaece802c32b638f805a57496a89e8ab1edc6223c (patch)
tree95dbfbb2398f9b68d0aee756d0b0ceec97624599 /scrumli.lisp
parenteb32c34e1f32cc493c0e1bfd171ba29a5ef1c2aa (diff)
downloadscrumli-aece802c32b638f805a57496a89e8ab1edc6223c.tar.gz
scrumli-aece802c32b638f805a57496a89e8ab1edc6223c.zip
Reload stories immediately
Reload the stories list immediately after successfully adding a new story.
Diffstat (limited to 'scrumli.lisp')
-rw-r--r--scrumli.lisp6
1 files changed, 4 insertions, 2 deletions
diff --git a/scrumli.lisp b/scrumli.lisp
index 4659457..778b1aa 100644
--- a/scrumli.lisp
+++ b/scrumli.lisp
@@ -97,12 +97,14 @@
parameters)
,@body))
-(define-route stories-new ("stories/new" :method :post)
+(define-route stories-new ("stories/new" :method :post
+ :content-type "text/json")
(if (logged-in-p)
(with-post-parameters ("role" "necessity" "headline" "content")
(post-story role necessity headline content
(hunchentoot:session-value :username))
- 200)
+ (with-output-to-string (out)
+ (encode-json '((status . "ok")) out)))
403))
(define-route tasks-new ("stories/tasks/new" :method :post)