1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-16 13:11:14 -08:00

Fix process name matching in 'tramp-process-running-p'

* lisp/net/tramp.el (tramp-process-running-p): Use 'compare-strings'
for matching PROCESS-NAME with process command.  (Bug#79545)

Copyright-paperwork-exempt: yes
This commit is contained in:
Renato Ferreira 2025-10-01 12:44:33 +02:00 committed by Michael Albinus
parent 217fd4f09e
commit 6a8fda1f33

View file

@ -6901,7 +6901,7 @@ verbosity of 6."
;; The returned command name could be truncated
;; to 15 characters. Therefore, we cannot check
;; for `string-equal'.
((string-prefix-p comm process-name))
((eq t (compare-strings comm 0 15 process-name 0 15)))
((throw 'result t)))))))))
;; When calling "emacs -Q", `auth-source-search' won't be called. If