diff options
Diffstat (limited to 'src/process.c')
| -rw-r--r-- | src/process.c | 7 |
1 files changed, 1 insertions, 6 deletions
diff --git a/src/process.c b/src/process.c index 11d914aab24..2aaa238f60c 100644 --- a/src/process.c +++ b/src/process.c | |||
| @@ -6842,12 +6842,7 @@ SIGCODE may be an integer, or a symbol whose name is a signal name. */) | |||
| 6842 | { | 6842 | { |
| 6843 | Lisp_Object tem = Fget_process (process); | 6843 | Lisp_Object tem = Fget_process (process); |
| 6844 | if (NILP (tem)) | 6844 | if (NILP (tem)) |
| 6845 | { | 6845 | tem = string_to_number (SSDATA (process), 10, true); |
| 6846 | Lisp_Object process_number | ||
| 6847 | = string_to_number (SSDATA (process), 10, true); | ||
| 6848 | if (NUMBERP (process_number)) | ||
| 6849 | tem = process_number; | ||
| 6850 | } | ||
| 6851 | process = tem; | 6846 | process = tem; |
| 6852 | } | 6847 | } |
| 6853 | else if (!NUMBERP (process)) | 6848 | else if (!NUMBERP (process)) |