summaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorsostler <sbostler@gmail.com>2010-04-23 18:10:24 -0400
committersostler <sbostler@gmail.com>2010-04-23 18:10:24 -0400
commitbf2fdf22cd7a87402195ee3bd799d476ceb0df1a (patch)
treedf662a607cde8b4ca07e73a8751ec102291d02c5 /src
parent21922b749a5696a2ea4274e0968ad2d3d20dcc9d (diff)
Scope cookies to all subdomains
Diffstat (limited to 'src')
-rwxr-xr-xsrc/cookie_login.clj4
-rw-r--r--src/site.clj4
2 files changed, 4 insertions, 4 deletions
diff --git a/src/cookie_login.clj b/src/cookie_login.clj
index 8c948a6..7eee2ae 100755
--- a/src/cookie_login.clj
+++ b/src/cookie_login.clj
@@ -8,8 +8,8 @@
"Creates an expiration cookie for a given cookie name."
[token-key]
(set-cookie token-key "dummy"
- :expires "Thu, 01-Jan-1970 00:00:01 GMT"))
-
+ :expires "Thu, 01-Jan-1970 00:00:01 GMT"
+ :domain ".dump.fm"))
(defn handle-request-with-login-token
"Validates login token, handles request, and updates cookies and session
diff --git a/src/site.clj b/src/site.clj
index 8342a09..3a8ecd3 100644
--- a/src/site.clj
+++ b/src/site.clj
@@ -303,8 +303,8 @@
(let [expiration (ms-in-future *login-token-expiry*)]
(set-cookie *login-token-key*
(encode-login-token nick hash expiration)
- :expires
- (gmt-string (new Date expiration)))))
+ :expires (gmt-string (new Date expiration))
+ :domain ".dump.fm")))
;; Landing