executable-interpret: Handle remote file names
* lisp/progmodes/executable.el (executable-interpret): Use `file-local-name' to get the local file name component from `buffer-file-name'. (Bug#79233) Copyright-paperwork-exempt: yes
This commit is contained in:
committed by
Michael Albinus
parent
c17168ebed
commit
f8a206937c
@@ -180,7 +180,7 @@ command to find the next error. The buffer is also in `comint-mode' and
|
||||
`compilation-shell-minor-mode', so that you can answer any prompts."
|
||||
(interactive (list (read-string "Run script: "
|
||||
(or executable-command
|
||||
buffer-file-name))))
|
||||
(file-local-name buffer-file-name)))))
|
||||
(require 'compile)
|
||||
(save-some-buffers (not compilation-ask-about-save))
|
||||
(setq-local executable-command command)
|
||||
|
||||
Reference in New Issue
Block a user