Mercurial > emacs
changeset 56542:6d2d9477f39e
(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.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Sun, 25 Jul 2004 17:43:57 +0000 |
| parents | 919c8adb1702 |
| children | 9125d1c4c537 |
| files | src/window.c |
| diffstat | 1 files changed, 7 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/src/window.c Sun Jul 25 17:36:07 2004 +0000 +++ b/src/window.c Sun Jul 25 17:43:57 2004 +0000 @@ -579,6 +579,8 @@ 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 @@ /* 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 @@ 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 (); }