Re: tramp (2.7.0-pre master/463cd87f0590970cfd2918ba7028304e0f712001); tramp-signal-process doesn't accept string arguments
Michael Albinus <[email protected]>
| Newsgroups | gmane.emacs.tramp |
|---|---|
| Message-ID | <[email protected]> |
Philipp <[email protected]> writes: Hi Philipp, > The function `tramp-signal-process' should accept a process name as a > string (to be converted to a process via `get-process') or a process ID > converted to a string, as documented for `signal-process'. Yep. What about the appended patch? Best regards, Michael.
(unnamed)
(text/x-patch, 707 B)
diff --git a/lisp/tramp.el b/lisp/tramp.el
index 8a5c9617..c515e305 100644
--- a/lisp/tramp.el
+++ b/lisp/tramp.el
@@ -6732,9 +6733,9 @@ will be the process to signal.
SIGCODE may be an integer, or a symbol whose name is a signal name."
(let (pid vec)
(cond
- ((processp process)
- (setq pid (process-get process 'remote-pid)
- vec (process-get process 'tramp-vector)))
+ ((or (processp process) (stringp process))
+ (setq pid (process-get (get-process process) 'remote-pid)
+ vec (process-get (get-process process) 'tramp-vector)))
((numberp process)
(setq pid process
vec (and (stringp remote) (tramp-dissect-file-name remote))))