diff options
Diffstat (limited to 'src/mulk/benki/auth.clj')
| -rw-r--r-- | src/mulk/benki/auth.clj | 7 |
1 files changed, 4 insertions, 3 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 + |