diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/mulk/benki/auth.clj | 19 |
1 files changed, 15 insertions, 4 deletions
diff --git a/src/mulk/benki/auth.clj b/src/mulk/benki/auth.clj index 9c5767d..5333269 100644 --- a/src/mulk/benki/auth.clj +++ b/src/mulk/benki/auth.clj @@ -67,10 +67,21 @@ (session/put! :discovered discovered) (redirect (.getDestinationUrl authreq true)))) +(def login-page-layout + {:head (list + [:link {:type "text/css", :rel "stylesheet", :href "/3rdparty/openid-selector/css/openid.css"}] + [:script {:type "text/javascript", :src "/3rdparty/openid-selector/js/openid-jquery.js"}] + [:script {:type "text/javascript", :src "/3rdparty/openid-selector/js/openid-en.js"}] + [:script {:type "text/javascript", :src "/js/openid-login.js"}] + )}) + (defpage "/login" [] - (layout "Benki Login" - [:p "Please enter your OpenID:"] + (layout login-page-layout "Benki Login" [:form {:action (resolve-uri "/login/authenticate"), :method "GET"} - [:input {:type "text", :name "openid"}] - [:input {:type "submit"}]])) + [:div {:id "openid_choice"} + [: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 "submit"}]]])) |