2108 |
tty_color_mode_alist = Fintern_soft (build_string ("tty-color-mode-alist"), |
tty_color_mode_alist = Fintern_soft (build_string ("tty-color-mode-alist"), |
2109 |
Qnil); |
Qnil); |
2110 |
|
|
2111 |
if (NATNUMP (val)) |
if (INTEGERP (val)) |
2112 |
color_mode = val; |
color_mode = val; |
2113 |
else |
else |
2114 |
{ |
{ |
2127 |
current_mode = XCDR (current_mode_spec); |
current_mode = XCDR (current_mode_spec); |
2128 |
else |
else |
2129 |
current_mode = Qnil; |
current_mode = Qnil; |
2130 |
if (NATNUMP (color_mode)) |
if (INTEGERP (color_mode)) |
2131 |
mode = XINT (color_mode); |
mode = XINT (color_mode); |
2132 |
else |
else |
2133 |
mode = 0; /* meaning default */ |
mode = 0; /* meaning default */ |
2134 |
if (NATNUMP (current_mode)) |
if (INTEGERP (current_mode)) |
2135 |
old_mode = XINT (current_mode); |
old_mode = XINT (current_mode); |
2136 |
else |
else |
2137 |
old_mode = 0; |
old_mode = 0; |