diff options
Diffstat (limited to 'scrumli.lisp')
| -rw-r--r-- | scrumli.lisp | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/scrumli.lisp b/scrumli.lisp index ef2b66a..0f563d9 100644 --- a/scrumli.lisp +++ b/scrumli.lisp @@ -80,6 +80,13 @@ 200) 403)) +(define-route tasks-new ("stories/:id/tasks/new" :method :post) + (if (logged-in-p) + (let ((description (hunchentoot:post-parameter "description"))) + (post-task id description (hunchentoot:session-value :username)) + 200) + 403)) + (define-route stories-state ("stories/state" :method :post) (if (logged-in-p) (let* ((id (hunchentoot:post-parameter "id")) |