From be6e5004e209fc008b44c07d770aa517fa6d47cb Mon Sep 17 00:00:00 2001 From: Chong Yidong Date: Fri, 30 Mar 2007 01:54:04 +0000 Subject: [PATCH] (eshell/kill): Tweak regexp to recognize SIGUSR1 and SIGUSR2. --- lisp/eshell/esh-proc.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/eshell/esh-proc.el b/lisp/eshell/esh-proc.el index d3dabbf04b5..96d8255a3ab 100644 --- a/lisp/eshell/esh-proc.el +++ b/lisp/eshell/esh-proc.el @@ -181,7 +181,7 @@ The signals which will cause this to happen are matched by (setq signum (abs (string-to-number id)))) ((stringp id) (let (case-fold-search) - (if (string-match "^-\\([A-Z]+\\)$" id) + (if (string-match "^-\\([A-Z]+[12]?\\)$" id) (setq signum (intern (concat "SIG" (match-string 1 id)))) (error "kill: bad signal spec `%s'" id)))) -- 2.39.5