changeset 76798:95e8e1e8d4de

(eshell/kill): Tweak regexp to recognize SIGUSR1 and SIGUSR2.
author Chong Yidong <cyd@stupidchicken.com>
date Fri, 30 Mar 2007 01:54:04 +0000
parents c02f4807a29f
children 60292a8c7998
files lisp/eshell/esh-proc.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/eshell/esh-proc.el	Fri Mar 30 01:53:54 2007 +0000
+++ b/lisp/eshell/esh-proc.el	Fri Mar 30 01:54:04 2007 +0000
@@ -181,7 +181,7 @@
 	    (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))))