aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--src/xterm.c13
1 files changed, 4 insertions, 9 deletions
diff --git a/src/xterm.c b/src/xterm.c
index f9eb67128a9..0b597a84553 100644
--- a/src/xterm.c
+++ b/src/xterm.c
@@ -1673,7 +1673,7 @@ x_is_vendor_fkey (sym)
1673 that the glyph at X, Y occupies, if BOUNDS != 0. 1673 that the glyph at X, Y occupies, if BOUNDS != 0.
1674 If NOCLIP is nonzero, do not force the value into range. */ 1674 If NOCLIP is nonzero, do not force the value into range. */
1675 1675
1676static void 1676void
1677pixel_to_glyph_coords (f, pix_x, pix_y, x, y, bounds, noclip) 1677pixel_to_glyph_coords (f, pix_x, pix_y, x, y, bounds, noclip)
1678 FRAME_PTR f; 1678 FRAME_PTR f;
1679 register int pix_x, pix_y; 1679 register int pix_x, pix_y;
@@ -1780,14 +1780,9 @@ construct_menu_click (result, event, f)
1780 ? up_modifier 1780 ? up_modifier
1781 : down_modifier)); 1781 : down_modifier));
1782 1782
1783 { 1783 XFASTINT (result->x) = event->x;
1784 int row, column; 1784 XSETINT (result->y, -1);
1785 1785 XSET (result->frame_or_window, Lisp_Frame, f);
1786 pixel_to_glyph_coords (f, event->x, event->y, &column, &row, NULL, 0);
1787 XFASTINT (result->x) = column;
1788 XFASTINT (result->y) = -1;
1789 XSET (result->frame_or_window, Lisp_Frame, f);
1790 }
1791} 1786}
1792 1787
1793/* Function to report a mouse movement to the mainstream Emacs code. 1788/* Function to report a mouse movement to the mainstream Emacs code.