diff --git a/src/gempub.lisp b/src/gempub.lisp
index 69bc83e..b49856a 100644
--- a/src/gempub.lisp
+++ b/src/gempub.lisp
@@ -106,7 +106,7 @@
     (ui:notify (format nil (_ "Syncing gempub library"))))
   (let ((all-known        (db:all-gempub-metadata))
         (all-gempub-files (remove-if-not (lambda (a) (gempub:gempub-file-p a
-                                                                          :ignore-errors t))
+                                                                           :ignore-errors t))
                                          (fs:collect-files/dirs (swconf:gempub-library-directory))))
         (removed-known    '())
         (added-file       '()))
@@ -273,7 +273,7 @@
                    (unselected-line-fg unselected-line-fg)
                    (query-rows         query-rows)) object
     (flet ((make-rows (rows selected-bg   selected-fg
-                            unselected-bg unselected-fg)
+                       unselected-bg unselected-fg)
              (mapcar (lambda (row)
                        (make-instance 'line
                                       :normal-text   (row->unselected-list-item row)
@@ -295,8 +295,8 @@
                                                          unselected-line-fg))
         (when suggested-message-index
           (handler-bind ((conditions:out-of-bounds
-                          (lambda (e)
-                            (invoke-restart 'ignore-selecting-action e))))
+                           (lambda (e)
+                             (invoke-restart 'ignore-selecting-action e))))
             (select-row object suggested-message-index)))
         (when redraw
           (win-clear object)