Browse Source

add alert message data to "/" defroute.

stable
Craig Oates 2 years ago
parent
commit
68792eac19
  1. 9
      src/web.lisp

9
src/web.lisp

@ -32,9 +32,12 @@
;; Routing rules
(defroute "/" ()
(hermetic:auth (:logged-in)
(render #P"index.html" (auth:auth-user-data))
(render #P"index.html")))
(let ((alert (utils:get-and-reset-alert)))
(hermetic:auth (:logged-in)
(render #P"index.html"
(append (auth:auth-user-data)
`(:alert ,alert)))
(render #P"index.html" `(:alert ,alert)))))
(defroute "/setup" ()
;; If there is no database, there is no user, hence no more checks.

Loading…
Cancel
Save