about summary refs log tree commit diff
path: root/web/panettone/src/packages.lisp
diff options
context:
space:
mode:
authorGriffin Smith <grfn@gws.fyi>2020-07-28T22·29-0400
committerglittershark <grfn@gws.fyi>2020-07-31T02·05+0000
commit94796399e246d395811e33a5f2da50157881386c (patch)
treedd54b668a4405830e7d392ae63cfad1cfb0b0a00 /web/panettone/src/packages.lisp
parent8e7ba41a3486a53de139486b75d72a349d13c415 (diff)
feat(web/panettone): Display issue history r/1510
Display the history of an issue (which currently is just opening and
closing) inline with the issue's comments on the issue show page

Change-Id: Id167bceef765cb4c24e86983d1dcd6624d0e5956
Reviewed-on: https://cl.tvl.fyi/c/depot/+/1497
Tested-by: BuildkiteCI
Reviewed-by: tazjin <mail@tazj.in>
Diffstat (limited to 'web/panettone/src/packages.lisp')
-rw-r--r--web/panettone/src/packages.lisp13
1 files changed, 8 insertions, 5 deletions
diff --git a/web/panettone/src/packages.lisp b/web/panettone/src/packages.lisp
index c5dd6aa5ae1e..327ea023b2c7 100644
--- a/web/panettone/src/packages.lisp
+++ b/web/panettone/src/packages.lisp
@@ -24,13 +24,15 @@
   (:export
    :connect-postgres :ddl/init
 
-   :issue
-   :issue-comment
-   :id :subject :body :author-dn :issue-id :status :created-at
+   :issue :issue-comment :issue-event
+   :id :subject :body :author-dn :issue-id :status :created-at :acting-user-dn
+   :field :previous-value :new-value
 
    :get-issue :issue-exists-p :list-issues :create-issue :set-issue-status
    :delete-issue :issue-not-found
 
+   :issue-events
+
    :issue-comments :num-comments :create-issue-comment))
 
 (defpackage panettone
@@ -38,10 +40,11 @@
         :panettone.util
         :panettone.authentication)
   (:import-from :defclass-std :defclass/std)
-  (:import-from :alexandria :if-let :when-let)
+  (:import-from :alexandria :if-let :when-let :switch)
   (:import-from
    :panettone.model
    :id :subject :body :author-dn :issue-id :status :created-at
-   :issue-comments :num-comments)
+   :field :previous-value :new-value :acting-user-dn
+   :issue-comments :num-comments :issue-events)
   (:shadow :next)
   (:export :start-pannetone :config :main))