From ec301e9b3cd1ae3a2bbdd71a9a480bfab6c0ca94 Mon Sep 17 00:00:00 2001 From: Matthias Andreas Benkard Date: Fri, 25 Nov 2011 11:27:38 +0100 Subject: Require authentication on wiki access. --- src/mulk/benki/auth.clj | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/mulk/benki/auth.clj') diff --git a/src/mulk/benki/auth.clj b/src/mulk/benki/auth.clj index 70662f8..cadd901 100644 --- a/src/mulk/benki/auth.clj +++ b/src/mulk/benki/auth.clj @@ -23,7 +23,7 @@ {:status 302, :headers {"Location" x}, :body ""}) -(defpartial return-from-openid-provider [] +(defn return-from-openid-provider [] (let [parlist (ParameterList. (:query-params (request/ring-request))) discovered (session/get :discovered) ;; Does the following work for POST requests? -- cgit v1.2.3