diff options
| author | Michael Albinus | 2025-05-30 12:28:15 +0200 |
|---|---|---|
| committer | Michael Albinus | 2025-05-30 12:28:15 +0200 |
| commit | 30c2ef6d6ab73b913ee5c4da7b6cfc26477f5faa (patch) | |
| tree | 7d46565b157c6c77fa48b3c6b75d6c364370be81 | |
| parent | f0bec20ac58ab84895b832fc545ea14c442d8332 (diff) | |
| download | emacs-30c2ef6d6ab73b913ee5c4da7b6cfc26477f5faa.tar.gz emacs-30c2ef6d6ab73b913ee5c4da7b6cfc26477f5faa.zip | |
Fix bug in `tramp-find-executable'
* lisp/net/tramp-sh.el (tramp-find-executable): Use "command -v",
preserving non-standard PATH search. Bug#78633)
| -rw-r--r-- | lisp/net/tramp-sh.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/net/tramp-sh.el b/lisp/net/tramp-sh.el index 64ad3d4996e..eb446f4e2cd 100644 --- a/lisp/net/tramp-sh.el +++ b/lisp/net/tramp-sh.el | |||
| @@ -4124,7 +4124,7 @@ This function expects to be in the right *tramp* buffer." | |||
| 4124 | (setq newdl (cons d newdl)))) | 4124 | (setq newdl (cons d newdl)))) |
| 4125 | (setq dirlist (nreverse newdl)))) | 4125 | (setq dirlist (nreverse newdl)))) |
| 4126 | (when (tramp-send-command-and-check | 4126 | (when (tramp-send-command-and-check |
| 4127 | vec (format "(unalias %s; %s command -pv %s)" | 4127 | vec (format "(unalias %s; %s command -v %s)" |
| 4128 | progname | 4128 | progname |
| 4129 | (if dirlist (concat "PATH=" (string-join dirlist ":")) "") | 4129 | (if dirlist (concat "PATH=" (string-join dirlist ":")) "") |
| 4130 | progname)) | 4130 | progname)) |