diff options
| author | Matthias Andreas Benkard <code@mail.matthias.benkard.de> | 2009-02-23 14:40:53 +0100 |
|---|---|---|
| committer | Matthias Andreas Benkard <code@mail.matthias.benkard.de> | 2009-02-23 14:40:53 +0100 |
| commit | 1d847f6db4463110b3c2d9ddfcc52973304b2cbb (patch) | |
| tree | c3dc72da1f3e812d2e985607f828c2be35e7e6cf | |
| parent | c483598d9d32ad6d126938070459408479877582 (diff) | |
Fix indentation.
| -rw-r--r-- | cljssss-g.clj | 10 |
1 files 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 "/")) |