summaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>2004-07-25 17:43:57 +0000
committerRichard M. Stallman <rms@gnu.org>2004-07-25 17:43:57 +0000
commit6487f669677b970c9b486cfeed6b6dff412ecec3 (patch)
tree77e322d81bf61468bcacf624ce25fde0de0e98b5 /src
parent81159bb955c88e1315e21be0df6c6cf7f0bd3766 (diff)
downloademacs-6487f669677b970c9b486cfeed6b6dff412ecec3.tar.gz
(coordinates_in_window): Return ON_SCROLL_BAR
instead of ON_VERTICAL_BORDER, when on scroll bar. (Fcoordinates_in_window_p): Handle ON_SCROLL_BAR--return nil.
Diffstat (limited to 'src')
-rw-r--r--src/window.c8
1 files changed, 7 insertions, 1 deletions
diff --git a/src/window.c b/src/window.c
index 8a574becd06..c3603c2039f 100644
--- a/src/window.c
+++ b/src/window.c
@@ -579,6 +579,8 @@ display margins, fringes, header line, and/or mode line. */)
if it is on the window's modeline, return ON_MODE_LINE;
if it is on the border between the window and its right sibling,
return ON_VERTICAL_BORDER.
+ if it is on a scroll bar,
+ return ON_SCROLL_BAR.
if it is on the window's top line, return ON_HEADER_LINE;
if it is in left or right fringe of the window,
return ON_LEFT_FRINGE or ON_RIGHT_FRINGE, and convert *X and *Y
@@ -673,7 +675,7 @@ coordinates_in_window (w, x, y)
/* Outside any interesting column? */
if (*x < left_x || *x > right_x)
- return ON_VERTICAL_BORDER;
+ return ON_SCROLL_BAR;
lmargin_width = window_box_width (w, LEFT_MARGIN_AREA);
rmargin_width = window_box_width (w, RIGHT_MARGIN_AREA);
@@ -818,6 +820,10 @@ If they are in the windows's left or right marginal areas, `left-margin'\n\
case ON_RIGHT_MARGIN:
return Qright_margin;
+ case ON_SCROLL_BAR:
+ /* Historically we are supposed to return nil in this case. */
+ return Qnil;
+
default:
abort ();
}