mirror of
git://git.sv.gnu.org/emacs.git
synced 2025-12-06 06:20:55 -08:00
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:
parent
c17168ebed
commit
f8a206937c
1 changed files with 1 additions and 1 deletions
|
|
@ -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)
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue