From fba4d145f8e8945e9fd2438e14075f3945da9fe3 Mon Sep 17 00:00:00 2001 From: Griffin Smith Date: Thu, 23 Jul 2020 19:28:39 -0400 Subject: feat(web/panettone): Add issue subject to page title Fixes: #8 Change-Id: I5513018e6d4908881a3522a24764729f2638b521 Reviewed-on: https://cl.tvl.fyi/c/depot/+/1408 Tested-by: BuildkiteCI Reviewed-by: kanepyork --- web/panettone/src/panettone.lisp | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/web/panettone/src/panettone.lisp b/web/panettone/src/panettone.lisp index 87c7b0659e..026d47825f 100644 --- a/web/panettone/src/panettone.lisp +++ b/web/panettone/src/panettone.lisp @@ -421,7 +421,10 @@ updated issue" (defroute show-issue ("/issues/:id" :decorators (@auth)) (&path (id 'integer)) (handler-case - (render/issue (get-issue *p-system* id)) + (let* ((issue (get-issue *p-system* id)) + (*title* (format nil "~A | Panettone" + (subject issue)))) + (render/issue issue)) (issue-not-found (_) (render/not-found "Issue")))) -- cgit 1.4.1