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

better var name

parent 17bc7830
Branches
Tags
No related merge requests found
......@@ -92,8 +92,8 @@
(when (> num-attempts-over-threshold 0)
(let [delay-seconds (* (math/expt num-attempts-over-threshold failed-login-delay-exponent)
failed-login-attempts-initial-delay-seconds)
next-login-allowed-ms (+ (.getTime most-recent-attempt) (* delay-seconds 1000))
seconds-till-next-login (int (math/round (/ (- next-login-allowed-ms (System/currentTimeMillis)) 1000)))]
last-login+delay-ms (+ (.getTime most-recent-attempt) (* delay-seconds 1000))
seconds-till-next-login (int (math/round (/ (- last-login+delay-ms (System/currentTimeMillis)) 1000)))]
(when (> seconds-till-next-login 0)
seconds-till-next-login))))))
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment