Mercurial > emacs

diff src/frame.c @ 107395:05f285327bae

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Put non-GTK X scroll-bars on left. * xfns.c (Fx_create_frame): * frame.c (Vdefault_frame_scroll_bars): Put non-GTK X scroll-bars on left.
author Chong Yidong <cyd@stupidchicken.com>
date Mon, 15 Mar 2010 13:16:46 -0400
parents f5c46cf84e9f
children 75e87467a0db
line wrap: on
line diff
--- a/src/frame.c	Mon Mar 15 01:39:53 2010 +0000
+++ b/src/frame.c	Mon Mar 15 13:16:46 2010 -0400
@@ -4584,8 +4584,14 @@
   DEFVAR_LISP ("default-frame-scroll-bars", &Vdefault_frame_scroll_bars,
 	       doc: /* Default position of scroll bars on this window-system.  */);
 #ifdef HAVE_WINDOW_SYSTEM
+#if defined(HAVE_NTGUI) || defined(NS_IMPL_COCOA) || (defined(USE_GTK) && defined(USE_TOOLKIT_SCROLL_BARS))
+  /* MS-Windows, Mac OS X, and GTK have scroll bars on the right by
+     default.  */
   Vdefault_frame_scroll_bars = Qright;
 #else
+  Vdefault_frame_scroll_bars = Qleft;
+#endif
+#else
   Vdefault_frame_scroll_bars = Qnil;
 #endif