Skip to content
Snippets Groups Projects
Commit 26222907 authored by Cam Saul's avatar Cam Saul
Browse files

cleanup

parents 46ea2a0c 8c14d25b
Branches
Tags
No related merge requests found
......@@ -107,7 +107,7 @@
(let [[[_ most-recent-attempt] :as recent-attempts] (filter (fn [[attempt-email _]]
(= email attempt-email))
@failed-login-attempts)]
(println "RECENT ATTEMPTS:\n" (metabase.util/pprint-to-str 'cyan recent-attempts)) ;; TODO - remove debug loggin
(println "RECENT ATTEMPTS:\n" (metabase.util/pprint-to-str 'cyan recent-attempts)) ;; TODO - remove debug logging
(when-let [login-delay (calculate-login-delay most-recent-attempt (count recent-attempts))]
(let [message (format "Too many recent failed logins! You must wait %d seconds before trying again." login-delay)]
(throw (ex-info message {:status-code 400
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment