summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorcolin <colin@cicadas.surf>2023-01-25 22:39:26 -0800
committercolin <colin@cicadas.surf>2023-01-25 22:39:26 -0800
commitc4aa9f05a5aeb78ac682b11b26dcbef0864a5847 (patch)
tree46c8ad0f30a2a2da0752e776ef1d755a76230961
parentfffea1715cfb51837cd990adf881443df9ccb74b (diff)
Tweak
-rw-r--r--flash.lisp3
1 files changed, 2 insertions, 1 deletions
diff --git a/flash.lisp b/flash.lisp
index 09818b0..e7222f2 100644
--- a/flash.lisp
+++ b/flash.lisp
@@ -28,7 +28,8 @@ expires."
(now
(get-universal-time))
(entry
- (gethash key *flashes* (make-flash-entry))))
+ (or (gethash key *flashes*)
+ (make-flash-entry))))
;; update the entry
(setf (flash-entry-timestamp entry) now
(getf (flash-entry-table entry) label) value