simplify
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:
parent
334bb6b353
commit
349dd71ce9
|
@ -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
|
||||
|
|
Loading…
Reference in a new issue