summaryrefslogtreecommitdiff
path: root/vampire.lisp
diff options
context:
space:
mode:
authorColin Okay <colin@cicadas.surf>2022-10-27 13:48:00 -0500
committerColin Okay <colin@cicadas.surf>2022-10-27 13:48:00 -0500
commitc5f0f6c32f3aa5ce2cac56e10585dac49617dec7 (patch)
tree233d11adc740863a398f49702a4d7421ac033126 /vampire.lisp
parent7ec9075c8a20b4a8f2b1c0de9e5b86e18ad4ae8e (diff)
Add: ensure logged in to access home and playlist pages
Diffstat (limited to 'vampire.lisp')
-rw-r--r--vampire.lisp4
1 files changed, 2 insertions, 2 deletions
diff --git a/vampire.lisp b/vampire.lisp
index 2e8f506..dcfb2e3 100644
--- a/vampire.lisp
+++ b/vampire.lisp
@@ -97,9 +97,9 @@
(initialize 'main
:extended-routing t
:static-root (static-directory config))
- (set-on-new-window 'user-home-page :path "/home")
+ (set-on-new-window (when-logged-in? 'user-home-page) :path "/home")
(set-on-new-window 'login-page :path "/login")
- (set-on-new-window 'playlist-page :path "/playlist")
+ (set-on-new-window (when-logged-in? 'playlist-page) :path "/playlist")
(set-on-new-window 'new-accout-page :path "/new-account")
(open-browser))