diff options
Diffstat (limited to 'src/site.clj')
| -rw-r--r-- | src/site.clj | 15 |
1 files changed, 10 insertions, 5 deletions
diff --git a/src/site.clj b/src/site.clj index d692849..422c0b3 100644 --- a/src/site.clj +++ b/src/site.clj @@ -1035,11 +1035,16 @@ WHERE u.user_id = ANY(?)" ts (maybe-parse-long (params :ts) 0) token (params :token) valid (valid-reset-link? nick token ts)] - (.setAttribute st "valid_request" valid) - (.setAttribute st "nick" nick) - (when valid - (.setAttribute st "link" (reset-link nick token ts))) - (.toString st))) + (if (and (zero? ts) + (nil? nick) + (nil? token)) + (reset-request-page session) + (do + (.setAttribute st "valid_request" valid) + (.setAttribute st "nick" nick) + (when valid + (.setAttribute st "link" (reset-link nick token ts))) + (.toString st))))) (defn reset-account! [session params] (let [nick (params :nick) |