Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

Drop some debug printing that was left in with the diagnostic stuff :(

  • Loading branch information...
commit 25b77fd81f2fbfce96706cbb8338bade071a1adf 1 parent 97832ee
@amalloy amalloy authored
Showing with 2 additions and 2 deletions.
  1. +2 −2 src/foreclojure/login.clj
View
4 src/foreclojure/login.clj
@@ -127,12 +127,12 @@
(if-let [{id :_id, name :user} (fetch-one :users
:where {:email email}
:only [:_id :user])]
- (let [{:keys [success] :as diagnostics} (? (try-to-email email name id))]
+ (let [{:keys [success] :as diagnostics} (try-to-email email name id)]
(if success
(do (session/session-put! :login-to "/login/update")
(flash-msg "Your password has been reset! You should receive an email soon."
(login-url "/login/update")))
- (do (spit (? (str name ".pwd")) (? diagnostics))
+ (do (spit (str name ".pwd") diagnostics)
(flash-error (str "Something went wrong emailing your new password! Please contact <a href='mailto:team@4clojure.com?subject=Password Reset: " name "'>team@4clojure.com</a> - we'll reset it manually and look into the problem. When you do, please mention your username.")
"/login/reset"))))
(flash-error "We don't know anyone with that email address!"
Please sign in to comment.
Something went wrong with that request. Please try again.