From: Eli Zaretskii <eliz@gnu.org>
Date: Mon, 22 Sep 2003 16:03:18 +0000 (+0000)
Subject: (set_tty_color_mode): Use INTEGERP to test whether a
X-Git-Tag: ttn-vms-21-2-B4~8772
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=9ac61a89356de9af2e8cc53f7264156386220e41;p=emacs.git

(set_tty_color_mode): Use INTEGERP to test whether a
color mode is an integer number (it could be -1).
---

diff --git a/src/term.c b/src/term.c
index 1f4ceaec627..dba6b0e4a52 100644
--- a/src/term.c
+++ b/src/term.c
@@ -2108,7 +2108,7 @@ set_tty_color_mode (f, val)
   tty_color_mode_alist = Fintern_soft (build_string ("tty-color-mode-alist"),
 				       Qnil);
 
-  if (NATNUMP (val))
+  if (INTEGERP (val))
     color_mode = val;
   else
     {
@@ -2127,11 +2127,11 @@ set_tty_color_mode (f, val)
     current_mode = XCDR (current_mode_spec);
   else
     current_mode = Qnil;
-  if (NATNUMP (color_mode))
+  if (INTEGERP (color_mode))
     mode = XINT (color_mode);
   else
     mode = 0;	/* meaning default */
-  if (NATNUMP (current_mode))
+  if (INTEGERP (current_mode))
     old_mode = XINT (current_mode);
   else
     old_mode = 0;