Skip to content
Browse files

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

  • Loading branch information...
1 parent 97832ee commit 25b77fd81f2fbfce96706cbb8338bade071a1adf @amalloy amalloy committed
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!"

0 comments on commit 25b77fd

Please sign in to comment.
Something went wrong with that request. Please try again.