From: Michael Albinus <michael.albinus@gmx.de>
Date: Fri, 1 Dec 2023 15:29:37 +0000 (+0100)
Subject: * test/lisp/net/tramp-tests.el (tramp-test31-signal-process): Extend.
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=eec1142acdde9d10781c781e7890c2d26f7e6b2d;p=emacs.git

* test/lisp/net/tramp-tests.el (tramp-test31-signal-process): Extend.
---

diff --git a/test/lisp/net/tramp-tests.el b/test/lisp/net/tramp-tests.el
index 58b8530ca2b..d8932a28e4d 100644
--- a/test/lisp/net/tramp-tests.el
+++ b/test/lisp/net/tramp-tests.el
@@ -5684,6 +5684,12 @@ If UNSTABLE is non-nil, the test is tagged as `:unstable'."
 	(delete-exited-processes t)
 	kill-buffer-query-functions command proc)
 
+    ;; If PROCESS is a string, it must be a process name or a process
+    ;; number.  Check error handling.
+    (should-error
+     (signal-process (md5 (current-time-string)) 0)
+     :type 'wrong-type-argument)
+
     ;; The PROCESS argument of `signal-process' can be a string.  Test
     ;; this as well.
     (dolist