From 1d847f6db4463110b3c2d9ddfcc52973304b2cbb Mon Sep 17 00:00:00 2001 From: Matthias Andreas Benkard Date: Mon, 23 Feb 2009 14:40:53 +0100 Subject: Fix indentation. --- cljssss-g.clj | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) diff --git a/cljssss-g.clj b/cljssss-g.clj index e1cee88..a9e8ffe 100644 --- a/cljssss-g.clj +++ b/cljssss-g.clj @@ -36,12 +36,12 @@ (.getInstanceOf templates "login") (.setAttributes {"logintext" "Login"}))))) (POST "/login" - (dosync - (with-db - (sql/with-query-results [{id :id password :password}] + (dosync + (with-db + (sql/with-query-results [{id :id password :password}] ["SELECT id, password FROM user WHERE name = ?" - (@params :name)] - (if (= password (@params :password)) + (@params :name)] + (if (= password (@params :password)) (do (alter session assoc :id id) (redirect-to "/")) -- cgit v1.2.3