Mercurial > hg > xemacs-beta
comparison src/scrollbar.c @ 1295:064ef1d07d63
[xemacs-hg @ 2003-02-14 07:54:27 by ben]
no specifier crashes under Windows, please
scrollbar.c: Don't generate fallbacks for TTY's when not HAVE_TTY.
author | ben |
---|---|
date | Fri, 14 Feb 2003 07:54:29 +0000 |
parents | 5d97d6110cd9 |
children | b531bf8658e9 |
comparison
equal
deleted
inserted
replaced
1294:8c5cf108f035 | 1295:064ef1d07d63 |
---|---|
974 This is a specifier; use `set-specifier' to change it. | 974 This is a specifier; use `set-specifier' to change it. |
975 */ ); | 975 */ ); |
976 Vscrollbar_width = make_magic_specifier (Qnatnum); | 976 Vscrollbar_width = make_magic_specifier (Qnatnum); |
977 set_specifier_fallback | 977 set_specifier_fallback |
978 (Vscrollbar_width, | 978 (Vscrollbar_width, |
979 #ifdef HAVE_TTY | |
979 list2 (Fcons (list1 (Qtty), make_int (0)), | 980 list2 (Fcons (list1 (Qtty), make_int (0)), |
980 Fcons (Qnil, make_int (DEFAULT_SCROLLBAR_WIDTH)))); | 981 Fcons (Qnil, make_int (DEFAULT_SCROLLBAR_WIDTH))) |
982 #else | |
983 list1 (Fcons (Qnil, make_int (DEFAULT_SCROLLBAR_WIDTH))) | |
984 #endif | |
985 ); | |
981 set_specifier_caching (Vscrollbar_width, | 986 set_specifier_caching (Vscrollbar_width, |
982 offsetof (struct window, scrollbar_width), | 987 offsetof (struct window, scrollbar_width), |
983 vertical_scrollbar_changed_in_window, | 988 vertical_scrollbar_changed_in_window, |
984 offsetof (struct frame, scrollbar_width), | 989 offsetof (struct frame, scrollbar_width), |
985 frame_size_slipped, 0); | 990 frame_size_slipped, 0); |
989 This is a specifier; use `set-specifier' to change it. | 994 This is a specifier; use `set-specifier' to change it. |
990 */ ); | 995 */ ); |
991 Vscrollbar_height = make_magic_specifier (Qnatnum); | 996 Vscrollbar_height = make_magic_specifier (Qnatnum); |
992 set_specifier_fallback | 997 set_specifier_fallback |
993 (Vscrollbar_height, | 998 (Vscrollbar_height, |
999 #ifdef HAVE_TTY | |
994 list2 (Fcons (list1 (Qtty), make_int (0)), | 1000 list2 (Fcons (list1 (Qtty), make_int (0)), |
995 Fcons (Qnil, make_int (DEFAULT_SCROLLBAR_HEIGHT)))); | 1001 Fcons (Qnil, make_int (DEFAULT_SCROLLBAR_HEIGHT))) |
1002 #else | |
1003 list1 (Fcons (Qnil, make_int (DEFAULT_SCROLLBAR_HEIGHT))) | |
1004 #endif | |
1005 ); | |
996 set_specifier_caching (Vscrollbar_height, | 1006 set_specifier_caching (Vscrollbar_height, |
997 offsetof (struct window, scrollbar_height), | 1007 offsetof (struct window, scrollbar_height), |
998 some_window_value_changed, | 1008 some_window_value_changed, |
999 offsetof (struct frame, scrollbar_height), | 1009 offsetof (struct frame, scrollbar_height), |
1000 frame_size_slipped, 0); | 1010 frame_size_slipped, 0); |