i think this weird assoc was a leftover artifact from the old
event-fn stuff that i removed already? either way, performing an assoc
here is entirely useless so lets get rid of it
This commit is contained in:
Gered 2022-01-03 18:13:03 -05:00
parent 334bb6b353
commit 349dd71ce9

View file

@ -40,10 +40,8 @@
(defn- sweep-entry
"'Sweep' a single entry, removing it from the session map if its lifetime has exceeded the given ttl."
[session-map ttl key]
(if-let [existing-entry (get session-map key)]
(if-not (entry-expired? ttl existing-entry)
(assoc session-map key existing-entry)
(dissoc session-map key))
(if (entry-expired? ttl (get session-map key))
(dissoc session-map key)
session-map))
(defn- process-read-entry