[#21] Bugfix for 'filepath option

This commit is contained in:
Radon Rosborough 2020-11-07 04:38:39 -08:00
parent 3be4b486dc
commit 23ee6b5b4d

View file

@ -413,7 +413,7 @@ modified from what is written to disk, then don't do anything."
project-dir)))))
(when (file-executable-p binary)
(setcar command binary)))))
(when (memq 'file command)
(when (or (memq 'file command) (memq 'filepath command))
(setq command (mapcar (lambda (arg)
(if (memq arg '(file filepath))
(prog1 buffer-file-name