diff options
| author | ckonstanski <ckonstanski@pippiandcarlos.com> | 2020-12-22 20:57:44 -0700 |
|---|---|---|
| committer | ckonstanski <ckonstanski@pippiandcarlos.com> | 2020-12-22 20:57:44 -0700 |
| commit | 4850ffaef859a3f33f03c5500602881e30b1039c (patch) | |
| tree | 4bcf433abc72ba0c01b4a5ead79081367aada2a9 /service/logout-service.lisp | |
| parent | e5947122bae1115b024be354ace6885cb360037e (diff) | |
Moved core to its own library
Diffstat (limited to 'service/logout-service.lisp')
| -rw-r--r-- | service/logout-service.lisp | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/service/logout-service.lisp b/service/logout-service.lisp index d6aef8f..afc3ace 100644 --- a/service/logout-service.lisp +++ b/service/logout-service.lisp @@ -10,8 +10,9 @@ (:documentation "")) (defmethod initialize-instance :after ((logout-service logout-service) &key) + (setf (location logout-service) "/home") (setf (message logout-service) "You are now logged out.")) (defun logout-json () - (set-user (make-default-user)) + (setf (session-value :permissions) nil) (objects-to-json `(,(make-instance 'logout-service)))) |