about summary refs log tree commit diff
diff options
context:
space:
mode:
-rw-r--r--web/panettone/src/panettone.lisp3
1 files changed, 2 insertions, 1 deletions
diff --git a/web/panettone/src/panettone.lisp b/web/panettone/src/panettone.lisp
index f9ed979adc..d87ac5ed46 100644
--- a/web/panettone/src/panettone.lisp
+++ b/web/panettone/src/panettone.lisp
@@ -485,7 +485,8 @@ given subject an body (in a thread, to avoid blocking)"
                  (id issue))
          :channel (or (uiop:getenvp "ISSUECHANNEL")
                       "#tvl"))
-        (hunchentoot:redirect "/"))))
+        (hunchentoot:redirect
+         (format nil "/issues/~A" (id issue))))))
 
 (defroute show-issue
     ("/issues/:id" :decorators (@auth-optional @handle-issue-not-found @db))