diff options
| author | tim b <timb@camcompu.home> | 2010-05-29 20:09:18 -0700 |
|---|---|---|
| committer | tim b <timb@camcompu.home> | 2010-05-29 20:09:18 -0700 |
| commit | dd8baca6e085e4d08ea76a191a18543351caa877 (patch) | |
| tree | 2725b67709c9b01d7551dba7b671cc4e98d84bf2 /src/cookie_login.clj | |
| parent | 2cd4a55732be51d13cd3651e48638cb9f07e3422 (diff) | |
add config clojure file
Diffstat (limited to 'src/cookie_login.clj')
| -rwxr-xr-x | src/cookie_login.clj | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/src/cookie_login.clj b/src/cookie_login.clj index 7eee2ae..5bf9811 100755 --- a/src/cookie_login.clj +++ b/src/cookie_login.clj @@ -1,5 +1,6 @@ (ns cookie-login - (:use compojure)) + (:use compojure + config)) (def *login-token-key* :login-token) (def *login-token-expiry* (* 1000 60 60 24 7)) ; one week @@ -9,7 +10,7 @@ [token-key] (set-cookie token-key "dummy" :expires "Thu, 01-Jan-1970 00:00:01 GMT" - :domain ".dump.fm")) + :domain *cookie-domain*)) (defn handle-request-with-login-token "Validates login token, handles request, and updates cookies and session |