From: Michael Albinus <michael.albinus@gmx.de>
Date: Sat, 22 Feb 2025 13:38:24 +0000 (+0100)
Subject: * lisp/net/tramp-sh.el (tramp-find-executable): Fix check.
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=ff7f76e7497a571c03facecc3719315b0c0ac20d;p=emacs.git

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

(cherry picked from commit e682fd2d5ba5f471a6e4d07b7f691a1ba9fa1139)
---

diff --git a/lisp/net/tramp-sh.el b/lisp/net/tramp-sh.el
index 3ced60eb0dd..080a74405d1 100644
--- a/lisp/net/tramp-sh.el
+++ b/lisp/net/tramp-sh.el
@@ -4114,8 +4114,9 @@ This function expects to be in the right *tramp* buffer."
      vec (format "%s type -P %s 2>%s"
 		 (if dirlist (concat "PATH=" (string-join dirlist ":")) "")
 		 progname (tramp-get-remote-null-device vec)))
-    (unless (zerop (buffer-size))
-      (string-trim (buffer-string)))))
+    (goto-char (point-min))
+    (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
 ;; send it.  This is likely not due to PATH_MAX, but PIPE_BUF.  We