diff options
| author | sostler <sbostler@gmail.com> | 2010-05-04 00:11:38 -0400 |
|---|---|---|
| committer | sostler <sbostler@gmail.com> | 2010-05-04 00:11:38 -0400 |
| commit | ee124f1a698551e8307176e8dfdfb04aa6535bae (patch) | |
| tree | 09c71dd33d11e12d41eb11eb1ff0496b3dc70f0f /src/user.clj | |
| parent | afef6f9e56586a8c5bc01f1dcf6bd3be65abd541 (diff) | |
Added user-accessible pw reset request
Diffstat (limited to 'src/user.clj')
| -rw-r--r-- | src/user.clj | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/user.clj b/src/user.clj index 9d3060f..b948a8f 100644 --- a/src/user.clj +++ b/src/user.clj @@ -37,6 +37,6 @@ "token" token})) (defn valid-reset-link? [nick token ts] - (if-let [info (fetch-nick nick)] + (if-let [info (and nick (fetch-nick nick))] (and (= token (reset-token (info :nick) (info :hash) ts)) - (>= ts (ms-ago (days 2))))))
\ No newline at end of file + (>= ts (ms-ago (days 2)))))) |