diff src/w32term.c @ 34869:1d671133e618

(syms_of_xterm): DEFVAR_LISP x-toolkit-scroll-bars instead of x-toolkit-scroll-bars-p. (Vx_toolkit_scroll_bars): Renamed from x_toolkit_scroll_bars_p.

--- a/src/w32term.c	Wed Dec 27 14:08:34 2000 +0000
+++ b/src/w32term.c	Wed Dec 27 14:33:11 2000 +0000
@@ -145,9 +145,9 @@
 extern Lisp_Object Qhelp_echo;
 
 
-/* Non-zero means Emacs uses toolkit scroll bars.  */
-
-int x_toolkit_scroll_bars_p;
+/* Non-nil means Emacs uses toolkit scroll bars.  */
+
+Lisp_Object Vx_toolkit_scroll_bars;
 
 /* If a string, w32_read_socket generates an event to display that string.
    (The display is done in read_char.)  */
@@ -10359,9 +10359,9 @@
 wide as that tab on the display.");
   x_stretch_cursor_p = 0;
 
-  DEFVAR_BOOL ("x-toolkit-scroll-bars-p", &x_toolkit_scroll_bars_p,
+  DEFVAR_LISP ("x-toolkit-scroll-bars", &Vx_toolkit_scroll_bars,
     "If not nil, Emacs uses toolkit scroll bars.");
-  x_toolkit_scroll_bars_p = 1;
+  Vx_toolkit_scroll_bars = Qt;
 
   staticpro (&last_mouse_motion_frame);
   last_mouse_motion_frame = Qnil;