From a6e7dbe4107ee17fc5dd8cfc796bcade8782e4f2 Mon Sep 17 00:00:00 2001 From: Matthias Andreas Benkard Date: Fri, 25 Nov 2011 11:04:38 +0100 Subject: Add a note for unregistered users that tells them their OpenID. --- src/mulk/benki/auth.clj | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) (limited to 'src/mulk/benki/auth.clj') 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."])))) -- cgit v1.2.3