summaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorMatthias Andreas Benkard <code@mail.matthias.benkard.de>2012-02-25 23:39:46 +0100
committerMatthias Andreas Benkard <code@mail.matthias.benkard.de>2012-02-25 23:39:46 +0100
commitb85f4777c02d3b08aa38f6d71d6efa370023cf7f (patch)
tree321fdaf9713de0221199686975090836adf8fd1d /src
parentd1592be24041ff9e5b8185885ce42c17cf11a983 (diff)
Fix login.
Diffstat (limited to 'src')
-rw-r--r--src/mulk/benki/auth.clj4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/mulk/benki/auth.clj b/src/mulk/benki/auth.clj
index 5333269..07e3694 100644
--- a/src/mulk/benki/auth.clj
+++ b/src/mulk/benki/auth.clj
@@ -60,7 +60,7 @@
(defpage "/login/return" []
(return-from-openid-provider))
-(defpage "/login/authenticate" {openid :openid}
+(defpage "/login/authenticate" {openid :openid_identifier}
(let [discoveries (.discover manager openid)
discovered (.associate manager discoveries)
authreq (.authenticate manager discovered (resolve-uri "/login/return"))]
@@ -83,5 +83,5 @@
[:p "Please select your OpenID provider:"]
[:div {:id "openid_btns"}]]
[:div {:id "openid_input_area"}
- [:input {:type "text", :name "openid", :id "openid_identifier"}]
+ [:input {:type "text", :name "openid_identifier", :id "openid_identifier"}]
[:input {:type "submit"}]]]))