1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-30 04:10:54 -08:00

(eshell/kill): Tweak regexp to recognize SIGUSR1 and SIGUSR2.

This commit is contained in:
Chong Yidong 2007-03-30 01:54:04 +00:00
parent b2d2c07e8d
commit be6e5004e2

View file

@ -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))))