summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--src/mulk/benki/auth.clj4
1 files changed, 3 insertions, 1 deletions
diff --git a/src/mulk/benki/auth.clj b/src/mulk/benki/auth.clj
index d9b9d3e..70662f8 100644
--- a/src/mulk/benki/auth.clj
+++ b/src/mulk/benki/auth.clj
@@ -49,7 +49,9 @@
(if-let [return-uri (session/flash-get)]
(redirect return-uri)
(layout "Authenticated!" [:p "Welcome back, " (:first_name user) "!"])))
- (layout "Authentication Failed" [:p "Did not recognize OpenID."]))))
+ (layout "Authentication Failed"
+ [:p "Did not recognize OpenID."]
+ [:p "Your OpenID is: " [:strong (.getIdentifier id)]]))))
(layout "Authentication Failed" [:p "OpenID authentication failed."]))))