mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-26 07:33:47 +00:00
Code Issues Releases Activity

(coordinates_in_window): Convert X and Y to window

Browse Source 
relative coordinates inside mode-line and header-line parts.
Convert X and Y to margin area relative coordinates inside left
and right display margin parts.
This commit is contained in:
Kim F. Storm 2003-06-05 00:36:28 +00:00
parent 9b87a0bc64
commit a530382071
1 changed files with 18 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

20
src/window.c
View File

@ -654,6 +654,10 @@ coordinates_in_window (w, x, y)
return ON_VERTICAL_BORDER;
}
/* Convert X and Y to window relative coordinates.
Mode line starts at left edge of window. */
*x -= x0;
*y -= top_y;
return part;
}
@ -703,7 +707,13 @@ coordinates_in_window (w, x, y)
&& (WINDOW_HAS_FRINGES_OUTSIDE_MARGINS (w)
? (*x >= left_x + WINDOW_LEFT_FRINGE_WIDTH (w))
: (*x < left_x + lmargin_width)))
return ON_LEFT_MARGIN;
{
*x -= x0;
if (WINDOW_HAS_FRINGES_OUTSIDE_MARGINS (w))
*x -= WINDOW_LEFT_FRINGE_WIDTH (w);
*y -= top_y;
return ON_LEFT_MARGIN;
}
/* Convert X and Y to window-relative pixel coordinates. */
*x -= left_x;
@ -717,7 +727,13 @@ coordinates_in_window (w, x, y)
&& (WINDOW_HAS_FRINGES_OUTSIDE_MARGINS (w)
? (*x < right_x - WINDOW_RIGHT_FRINGE_WIDTH (w))
: (*x >= right_x - rmargin_width)))
return ON_RIGHT_MARGIN;
{
*x -= right_x;
if (!WINDOW_HAS_FRINGES_OUTSIDE_MARGINS (w))
*x -= WINDOW_RIGHT_FRINGE_WIDTH (w);
*y -= top_y;
return ON_RIGHT_MARGIN;
}
/* Convert X and Y to window-relative pixel coordinates. */
*x -= left_x + WINDOW_LEFT_FRINGE_WIDTH (w);