diff --git a/scsh/encryption/blowfish.scm b/scsh/encryption/blowfish.scm
index d784b8d..e644300 100644
--- a/scsh/encryption/blowfish.scm
+++ b/scsh/encryption/blowfish.scm
@@ -1107,7 +1107,7 @@
                           (make-dictionary)
                           (make-dictionary)
                           (make-dictionary)
-                          (make-dictionary))
+                          (make-dictionary)))
 
 (define blowfish-ps (make-dictionary))
 (dictionary-add! blowfish-ps 0  '243F6A88)