/[emacs]/emacs/src/term.c
ViewVC logotype

Diff of /emacs/src/term.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.135 by eliz, Fri Jan 25 13:21:49 2002 UTC revision 1.136 by eliz, Fri Jan 25 14:08:42 2002 UTC
# Line 1976  turn_off_face (f, face_id) Line 1976  turn_off_face (f, face_id)
1976    
1977  DEFUN ("tty-display-color-p", Ftty_display_color_p, Stty_display_color_p,  DEFUN ("tty-display-color-p", Ftty_display_color_p, Stty_display_color_p,
1978         0, 1, 0,         0, 1, 0,
1979         doc: /* Return non-nil if TTY can display colors on FRAME.  */)         doc: /* Return non-nil if TTY can display colors on DISPLAY.  */)
1980       (frame)       (display)
1981       Lisp_Object frame;       Lisp_Object display;
1982  {  {
1983    return TN_max_colors > 0 ? Qt : Qnil;    return TN_max_colors > 0 ? Qt : Qnil;
1984  }  }
# Line 1986  DEFUN ("tty-display-color-p", Ftty_displ Line 1986  DEFUN ("tty-display-color-p", Ftty_displ
1986  /* Return the number of supported colors.  */  /* Return the number of supported colors.  */
1987  DEFUN ("tty-display-color-cells", Ftty_display_color_cells,  DEFUN ("tty-display-color-cells", Ftty_display_color_cells,
1988         Stty_display_color_cells, 0, 1, 0,         Stty_display_color_cells, 0, 1, 0,
1989    "Return the number of colors supported by TTY on FRAME.")         doc: /* Return the number of colors supported by TTY on DISPLAY.  */)
1990       (frame)       (display)
1991       Lisp_Object frame;       Lisp_Object display;
1992  {  {
1993    return make_number (TN_max_colors);    return make_number (TN_max_colors);
1994  }  }

Legend:
Removed from v.1.135  
changed lines
  Added in v.1.136

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26