glenn
/
asteroid
mirror of https://github.com/glenneth1/asteroid.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

fix: restore AUTHSTATE object when there is no login

This commit is contained in:
Luis Pereira 2026-01-22 16:31:19 +00:00 committed by Brian O'Reilly
parent 0def454077
commit 6b56a17b4a
1 changed files with 4 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
user-management.lisp
View File

@ -163,12 +163,10 @@
template file."
(let ((user (get-current-user)))
(format nil "var AUTHSTATE = ~a"
(if user
(cl-json:encode-json-to-string
`(("loggedIn" . t)
("isAdmin" . ,(when (user-has-role-p user :admin) t))
("username" . ,(dm:field user "username"))))
"null"))))
`(("loggedIn" . ,(when user t))
("isAdmin" . ,(when (and user (user-has-role-p user :admin)) t))
("username" . ,(when user (dm:field user "username"))))))))
(defun require-authentication (&key (api nil))
"Require user to be authenticated.