Created
June 22, 2018 09:22
-
-
Save jmercouris/15acdd2b6ef7f6f14e4c8741b748be7a to your computer and use it in GitHub Desktop.
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
(defmacro with-logged-in (&body body) | |
`(if (gethash :logged-in *session*) | |
(progn ,@body) | |
(cl-markup:markup | |
(:h1 "You are not logged in.")))) |
Sign up for free
to join this conversation on GitHub.
Already have an account?
Sign in to comment