diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/mulk/benki/auth.clj | 7 | ||||
| -rw-r--r-- | src/mulk/benki/config.clj | 2 |
2 files changed, 5 insertions, 4 deletions
diff --git a/src/mulk/benki/auth.clj b/src/mulk/benki/auth.clj index f3e2a95..5a7e847 100644 --- a/src/mulk/benki/auth.clj +++ b/src/mulk/benki/auth.clj @@ -50,10 +50,11 @@ (if-let [return-uri (session/flash-get ::return-uri)] (redirect return-uri) (layout {} "Authenticated!" [:p "Welcome back, " (:first_name user) "!"]))) - (layout "Authentication Failed" + (layout {} + "Authentication Failed" [:p "Did not recognize OpenID."] [:p "Your OpenID is: " [:strong (.getIdentifier id)]])))) - (layout "Authentication Failed" [:p "OpenID authentication failed."])))) + (layout {} "Authentication Failed" [:p "OpenID authentication failed."])))) (defpage [:post "/login/browserid/verify"] {assertion :assertion} @@ -165,4 +166,4 @@ [:div {:id "openid_input_area"} [:input {:type "text", :name "openid_identifier", :id "openid_identifier"}] [:input {:type "submit"}]]]]))))))) -
\ No newline at end of file + diff --git a/src/mulk/benki/config.clj b/src/mulk/benki/config.clj index c9a9dbe..30984b5 100644 --- a/src/mulk/benki/config.clj +++ b/src/mulk/benki/config.clj @@ -1,4 +1,4 @@ (ns mulk.benki.config (:refer-clojure)) -(def benki-config (atom nil)) +(defonce benki-config (atom nil)) |