Tweak

1 files changed, 4 insertions, 3 deletions

diff --git a/flash.lisp b/flash.lisp
index 1fedd4a..b655fa0 100644
--- a/flash.lisp
+++ b/flash.lisp
@@ -12,6 +12,7 @@
   "Number of seconds a flashed value lives.")
 
 (defstruct flash-entry
+  "TABLE is a PLIST"
   (timestamp (get-universal-time))
   (table nil))
 
@@ -29,9 +30,9 @@ expires."
            (or (lzb:request-cookie +flash-cookie-name+) (nuid)))
          (now
            (get-universal-time)))
-    ;; holdign a lock here b/c I do stuff in between getting an entry
-    ;; and writing to it. 
-    (bt:with-lock-held (*flash-lock* )
+    ;; holding a lock here b/c I do stuff in between getting an entry
+    ;; and writing to it.
+    (bt:with-lock-held (*flash-lock*)
       (let ((entry
               (or (gethash key *flashes*)
                   (make-flash-entry))))