diff options
| author | ckonstanski <ckonstanski@pippiandcarlos.com> | 2020-12-27 11:06:24 -0700 |
|---|---|---|
| committer | ckonstanski <ckonstanski@pippiandcarlos.com> | 2020-12-27 11:06:24 -0700 |
| commit | 30421258c56accea65ee52f64599c72f73cb053a (patch) | |
| tree | e33a2f9c1a4d7745b8c7a2162c8df55f41f463f6 /service/auth-service.lisp | |
| parent | 37889cb9d5bb58c659ffcee6c4d20040fc16d5e2 (diff) | |
removed unnecessary :url parameter in menu config
Diffstat (limited to 'service/auth-service.lisp')
| -rw-r--r-- | service/auth-service.lisp | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/service/auth-service.lisp b/service/auth-service.lisp index 1702bde..d250058 100644 --- a/service/auth-service.lisp +++ b/service/auth-service.lisp @@ -22,9 +22,9 @@ (org-ckons-json::objects-to-json `(,,instance)))) (defmacro with-noauth ((instance rest-service) &body body) - `(let ((,instance (make-instance ',rest-service))) - ,@body - (when (location-p ,instance) - (setf (session-value :message) nil) - (setf (session-value :errormsg) nil)) - (org-ckons-json::objects-to-json `(,,instance)))) + `(let ((,instance (make-instance ',rest-service))) + ,@body + (when (location-p ,instance) + (setf (session-value :message) nil) + (setf (session-value :errormsg) nil)) + (org-ckons-json::objects-to-json `(,,instance)))) |