From c4aa9f05a5aeb78ac682b11b26dcbef0864a5847 Mon Sep 17 00:00:00 2001
From: colin <colin@cicadas.surf>
Date: Wed, 25 Jan 2023 22:39:26 -0800
Subject: Tweak

---
 flash.lisp | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

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
-- 
cgit v1.2.3