(parse_signal): Use xstricmp instead of strcasecmp.

(Fsignal_process): Don't use strncasecmp.

1 files changed, 2 insertions, 2 deletions

diff --git a/src/process.c b/src/process.c
index 4abf1de79a2..0ea27ded7df 100644
--- a/src/process.c
+++ b/src/process.c
@@ -6148,7 +6148,7 @@ SIGCODE may be an integer, or a symbol whose name is a signal name.  */)
  got_it:
 
 #define parse_signal(NAME, VALUE)               \
-  else if (!strcasecmp (name, NAME))            \
+  else if (!xstricmp (name, NAME))              \
     XSETINT (sigcode, VALUE)
 
   if (INTEGERP (sigcode))
@@ -6160,7 +6160,7 @@ SIGCODE may be an integer, or a symbol whose name is a signal name.  */)
       CHECK_SYMBOL (sigcode);
       name = SDATA (SYMBOL_NAME (sigcode));
 
-      if (!strncasecmp(name, "sig", 3))
+      if (!strncmp(name, "SIG", 3) || !strncmp(name, "sig", 3))
         name += 3;
 
       if (0)