tools/magit: fix stringp error for missing executables

This commit is contained in:
Henrik Lissner 2020-08-15 12:18:07 -04:00
parent 5755754702
commit 10edc92bce
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395

View file

@ -110,9 +110,10 @@ For example, diffs and log buffers. Accepts `left', `right', `up', and `down'.")
;; projects if the git executable isn't in the exact same location. ;; projects if the git executable isn't in the exact same location.
(add-hook! 'magit-status-mode-hook (add-hook! 'magit-status-mode-hook
(defun +magit-optimize-process-calls-h () (defun +magit-optimize-process-calls-h ()
(setq-local magit-git-executable (executable-find magit-git-executable) (dolist (sym '(magit-git-executable magit-perl-executable magit-gitk-executable))
magit-perl-executable (executable-find magit-perl-executable) (when-let* ((exe (symbol-value sym))
magit-gitk-executable (executable-find magit-gitk-executable))))) (path (executable-find exe)))
(set (make-local-variable sym) path))))))
(use-package! forge (use-package! forge