# HG changeset patch
# User michaels
# Date 1044953819 0
# Node ID 5d97d6110cd9188287c2b752116333519dd2e628
# Parent  c605ef77f290097a051a773af6308678ee009519
[xemacs-hg @ 2003-02-11 08:56:57 by michaels]
2003-02-07  Mike Sperber  <mike@xemacs.org>

	* scrollbar.c (specifier_vars_of_scrollbar):
	(specifier_vars_of_scrollbar): TTY devices don't have scrollbars.

diff -r c605ef77f290 -r 5d97d6110cd9 src/ChangeLog
--- a/src/ChangeLog	Mon Feb 10 22:52:17 2003 +0000
+++ b/src/ChangeLog	Tue Feb 11 08:56:59 2003 +0000
@@ -1,3 +1,8 @@
+2003-02-07  Mike Sperber  <mike@xemacs.org>
+
+	* scrollbar.c (specifier_vars_of_scrollbar): 
+	(specifier_vars_of_scrollbar): TTY devices don't have scrollbars.
+
 2003-01-28  Martin Buchholz  <martin@xemacs.org>
 
 	* config.h.in (_ALL_SOURCE): Guard against multiple definition.
diff -r c605ef77f290 -r 5d97d6110cd9 src/scrollbar.c
--- a/src/scrollbar.c	Mon Feb 10 22:52:17 2003 +0000
+++ b/src/scrollbar.c	Tue Feb 11 08:56:59 2003 +0000
@@ -976,7 +976,8 @@
   Vscrollbar_width = make_magic_specifier (Qnatnum);
   set_specifier_fallback
     (Vscrollbar_width,
-     list1 (Fcons (Qnil, make_int (DEFAULT_SCROLLBAR_WIDTH))));
+     list2 (Fcons (list1 (Qtty), make_int (0)),
+	    Fcons (Qnil, make_int (DEFAULT_SCROLLBAR_WIDTH))));
   set_specifier_caching (Vscrollbar_width,
 			 offsetof (struct window, scrollbar_width),
 			 vertical_scrollbar_changed_in_window,
@@ -990,7 +991,8 @@
   Vscrollbar_height = make_magic_specifier (Qnatnum);
   set_specifier_fallback
     (Vscrollbar_height,
-     list1 (Fcons (Qnil, make_int (DEFAULT_SCROLLBAR_HEIGHT))));
+     list2 (Fcons (list1 (Qtty), make_int (0)),
+	    Fcons (Qnil, make_int (DEFAULT_SCROLLBAR_HEIGHT))));
   set_specifier_caching (Vscrollbar_height,
 			 offsetof (struct window, scrollbar_height),
 			 some_window_value_changed,