emacs/gnu.emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2026-09-10 07:46:51 -04:00
Code Issues Actions Packages Projects Releases Wiki Activity

* lisp/net/tramp-sh.el (tramp-find-executable): Fix check.

Browse source
This commit is contained in:
Michael Albinus 2025-02-22 14:38:24 +01:00
parent f0d58d976a
commit e682fd2d5b
1 changed files with 3 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
lisp/net/tramp-sh.el
View file

@ -4107,8 +4107,9 @@ This function expects to be in the right *tramp* buffer."
vec (format "%s type -P %s 2>%s" vec (format "%s type -P %s 2>%s"
(if dirlist (concat "PATH=" (string-join dirlist ":")) "") (if dirlist (concat "PATH=" (string-join dirlist ":")) "")
progname (tramp-get-remote-null-device vec))) progname (tramp-get-remote-null-device vec)))
(unless (zerop (buffer-size)) (goto-char (point-min))
(string-trim (buffer-string))))) (when (search-forward-regexp "/" nil 'noerror)
(string-trim (buffer-substring (match-beginning 0) (point-max))))))
;; On hydra.nixos.org, the $PATH environment variable is too long to ;; On hydra.nixos.org, the $PATH environment variable is too long to
;; send it. This is likely not due to PATH_MAX, but PIPE_BUF. We ;; send it. This is likely not due to PATH_MAX, but PIPE_BUF. We