 problems with doom."
   (doom-reload-doom-autoloads force-p)
   (unwind-protect
-      (progn (ignore-errors (doom-packages-autoremove doom-auto-accept))
-             (ignore-errors (doom-packages-install doom-auto-accept)))
+      (progn
+        (ignore-errors
+          (doom-packages-autoremove doom-auto-accept))
+        (ignore-errors
+          (doom-packages-install doom-auto-accept)))
     (doom-reload-package-autoloads force-p)
     (doom-byte-compile nil 'recompile)))
 


BODY will be run when this dispatcher is called."
  (declare (doc-string 3))
  (let* ((command (doom-enlist command))
         (cmd (car command))
         (aliases (cdr command)))
    `(progn
       ,(when aliases
          `(dolist (alias ',aliases)
             (map-put doom--dispatch-alias-alist alias ',cmd)))
       (map-put doom--dispatch-command-alist
                ',cmd (list :desc ,docstring
                            ;; FIXME Implicit args var; ew
                            :body (lambda (args) ,form))))))


;;

  (or (null file)
      (stringp file)
      (signal 'wrong-type-argument (list 'stringp file)))
  (cond ((file-equal-p file doom-autoload-file)
         (doom-reload-doom-autoloads force-p))
        ((file-equal-p file doom-package-autoload-file)
         (doom-reload-package-autoloads force-p))
        ((progn
           (doom-reload-doom-autoloads force-p)
