diff options
| author | Matthias Andreas Benkard <code@mail.matthias.benkard.de> | 2011-11-25 11:04:38 +0100 |
|---|---|---|
| committer | Matthias Andreas Benkard <code@mail.matthias.benkard.de> | 2011-11-25 11:04:38 +0100 |
| commit | a6e7dbe4107ee17fc5dd8cfc796bcade8782e4f2 (patch) | |
| tree | 688d59a5fb3c67d143452cf4bcb55f248164beac /src | |
| parent | 1e34ede86cd441351b1d9395a77ed74bc72d19a1 (diff) | |
Add a note for unregistered users that tells them their OpenID.
Diffstat (limited to 'src')
| -rw-r--r-- | src/mulk/benki/auth.clj | 4 |
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."])))) |