     (if (equal (process-status proc) 'exit)
         (progn
           (dwim-shell-command--finalize (current-buffer)
-                                files-before
-                                proc
-                                progress-reporter
-                                on-completion))
+                                        files-before
+                                        proc
+                                        progress-reporter
+                                        on-completion))
       (setq dwim-shell-command--commands
             (push (cons (process-name proc)
                         (make-dwim-shell-command--command :script script
-                                               :process proc
-                                               :name (process-name proc)
-                                               :calling-buffer (current-buffer)
-                                               :files-before files-before
-                                               :reporter progress-reporter))
+                                                          :process proc
+                                                          :name (process-name proc)
+                                                          :calling-buffer (current-buffer)
+                                                          :files-before files-before
+                                                          :reporter progress-reporter))
                   dwim-shell-command--commands))
       (set-process-sentinel proc #'dwim-shell-command--sentinel)
       (set-process-filter proc #'dwim-shell-command--filter))))

                       revert-buffer-function)
              (funcall revert-buffer-function nil t))
            (setq oldest-new-file
                  (car (last (seq-sort #'file-newer-than-file-p
                                       (seq-difference (dwim-shell-command--default-directory-files)
                                                       files-before)))))
            (when oldest-new-file
              (dired-jump nil oldest-new-file)))
          (when on-completion

(defun dwim-shell-command--sentinel (process state)
  (let ((exec (map-elt dwim-shell-command--commands (process-name process))))
    (dwim-shell-command--finalize (dwim-shell-command--command-calling-buffer exec)
                                  (dwim-shell-command--command-files-before exec)
                                  process
                                  (dwim-shell-command--command-reporter exec)
                                  (dwim-shell-command--command-on-completion exec))))

(defun dwim-shell-command--filter (process string)
  (when-let* ((exec (map-elt dwim-shell-command--commands (process-name process)))
