Navigation Menu

Skip to content

Instantly share code, notes, and snippets.

@bhenry

bhenry/gist:eeb13a3b34ade3739428 Secret

Created February 29, 2012 20:28
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save bhenry/eeb13a3b34ade3739428 to your computer and use it in GitHub Desktop.
Save bhenry/eeb13a3b34ade3739428 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
gistfile1.clj
(defpage [:post "/login"]
{:keys [user pass] :as params}
(if (authenticate user pass)
(do
(session/put! :auth? true)
(pr-str "You are authenticated"))
(pr-str "Authentication Failed!")))
;;i want the html referrer to redirect on success
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment