1983 |
return TN_max_colors > 0 ? Qt : Qnil; |
return TN_max_colors > 0 ? Qt : Qnil; |
1984 |
} |
} |
1985 |
|
|
1986 |
|
/* Return the number of supported colors. */ |
1987 |
|
DEFUN ("tty-display-color-cells", Ftty_display_color_cells, |
1988 |
|
Stty_display_color_cells, 0, 1, 0, |
1989 |
|
"Return the number of colors supported by TTY on FRAME.") |
1990 |
|
(frame) |
1991 |
|
Lisp_Object frame; |
1992 |
|
{ |
1993 |
|
return make_number (TN_max_colors); |
1994 |
|
} |
1995 |
|
|
1996 |
#ifndef WINDOWSNT |
#ifndef WINDOWSNT |
1997 |
|
|
1998 |
/* Save or restore the default color-related capabilities of this |
/* Save or restore the default color-related capabilities of this |
2570 |
Vring_bell_function = Qnil; |
Vring_bell_function = Qnil; |
2571 |
|
|
2572 |
defsubr (&Stty_display_color_p); |
defsubr (&Stty_display_color_p); |
2573 |
|
defsubr (&Stty_display_color_cells); |
2574 |
} |
} |
2575 |
|
|