]> code.delx.au - gnu-emacs/commitdiff
(struct scroll_bar) [USE_TOOLKIT_SCROLL_BARS]:
authorYAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp>
Fri, 27 Jul 2007 08:41:17 +0000 (08:41 +0000)
committerYAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp>
Fri, 27 Jul 2007 08:41:17 +0000 (08:41 +0000)
New member fringe_extended_p.

src/ChangeLog
src/xterm.h

index 3779a9fe8f3b7378718eb244d1d886e0a5ca243d..b8c2d7a90edbe1f9132b44de53ecf3dac2fedf90 100644 (file)
@@ -1,3 +1,26 @@
+2007-07-27  YAMAMOTO Mitsuharu  <mituharu@math.s.chiba-u.ac.jp>
+
+       * w32term.c (w32_draw_fringe_bitmap): Extend fringe background to
+       scroll bar gap.
+       (x_scroll_bar_create): Set bar->fringe_extended_p.
+       (w32_set_vertical_scroll_bar): Put leftmost/rightmost scroll bars
+       on frame edge.  Check fringe background extension.  Don't clear
+       extended fringe background area.
+
+       * w32term.h (struct scroll_bar): New member fringe_extended_p.
+       (w32_fill_area): Enclose multiple statements with do ... while (0).
+
+       * xterm.c (x_draw_fringe_bitmap) [USE_TOOLKIT_SCROLL_BARS]:
+       Extend fringe background to scroll bar gap.
+       (x_scroll_bar_create) [USE_TOOLKIT_SCROLL_BARS]:
+       Set bar->fringe_extended_p.
+       (XTset_vertical_scroll_bar) [USE_TOOLKIT_SCROLL_BARS]:
+       Put leftmost/rightmost scroll bars on frame edge.  Check fringe
+       background extension.  Don't clear extended fringe background area.
+
+       * xterm.h (struct scroll_bar) [USE_TOOLKIT_SCROLL_BARS]:
+       New member fringe_extended_p.
+
 2007-07-25  Glenn Morris  <rgm@gnu.org>
 
        * Relicense all FSF files to GPLv3 or later.
index 70e0522e9cc6117627c4f72376a01837d2b03efa..65499d45b0f52ec0c08ce8ac32ac07a561abdd3e 100644 (file)
@@ -807,6 +807,12 @@ struct scroll_bar
      place where the user grabbed it.  If the handle isn't currently
      being dragged, this is Qnil.  */
   Lisp_Object dragging;
+
+#ifdef USE_TOOLKIT_SCROLL_BARS
+  /* t if the background of the fringe that is adjacent to a scroll
+     bar is extended to the gap between the fringe and the bar.  */
+  Lisp_Object fringe_extended_p;
+#endif
 };
 
 /* The number of elements a vector holding a struct scroll_bar needs.  */