feat(web/panettone): Add issue statuses

Add support for issue statuses, which is currently a trivial groupoid of
open and closed. On the show page for open issues there's a Close
button, and on the show page for closed issues there's a Reopen button.
In addition, the index page is filtered by open issues only and there's
a link to view closed issues.

Change-Id: I6c0c3d2e874b1c801e9e06c804f5c1b12db5dbdc
Reviewed-on: https://cl.tvl.fyi/c/depot/+/1352
Tested-by: BuildkiteCI
Reviewed-by: glittershark <grfn@gws.fyi>
This commit is contained in:
Griffin Smith 2020-07-22 23:11:10 -04:00 committed by glittershark
parent a107d8e335
commit bd3c19320a
2 changed files with 138 additions and 49 deletions

View file

@ -19,6 +19,9 @@
(defparameter color/success-2
"rgb(168, 249, 166)")
(defparameter color/failure
"rgb(247, 167, 167)")
(defun button (selector)
`((,selector
:background-color ,color/success
@ -32,8 +35,7 @@
((:and ,selector (:or :active :focus))
:box-shadow "0.1rem" "0.1rem" "0" "0" "rgba(0,0,0,0.05)"
:outline "none"
:border "none"
:background-color ,color/success-2)))
:border "none")))
(defparameter issue-list-styles
`((.issue-list
@ -103,9 +105,19 @@
,@(button '(:and input (:= type "submit")))))
(defparameter issue-styles
`((.issue-info
:display "flex"
:justify-content "space-between"
:align-items "center"
(.close-issue
:background-color ,color/failure))))
(defparameter styles
`(,@form-styles
,@issue-list-styles
,@issue-styles
,@comment-styles
(body