mirrors/clog
1
Fork 0
mirror of https://github.com/rabbibotton/clog.git synced 2025-12-07 03:00:49 -08:00
Code Issues Projects Releases Wiki Activity

used *clog-auth-key* for consistency in clog-auth.lisp

Browse source
This commit is contained in:
Shaka Chen 2022-07-27 09:51:08 +08:00
parent 130192ad5c
commit c0e70f0fae
1 changed files with 4 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

2
source/clog-auth.lisp
View file

@ -77,7 +77,7 @@ for CLOG")
(declare (ignore obj))
(set-on-storage (window body) nil)
(when (equalp (getf data :key)
"clog-auth-token")
*clog-auth-key*)
(funcall handler body)))))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;