diff --git a/src/main.lisp b/src/main.lisp
index 1ebedae..dccc7e6 100644
--- a/src/main.lisp
+++ b/src/main.lisp
@@ -279,4 +279,4 @@
     ; handle partitions
     (maphash #'(lambda (partition-name fsymbol)
         (db/partition/update dbpath partition-name fsymbol object file-basename old-object))
-      (db-partitions database)))
+      (db-partitions database))))