# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 767051172 0
# Node ID 55f9a506180d35073e9900174fca269f395b2a8d
# Parent  24e7599197705ce1f37fde37b8111fb7fa566ea1
(x_set_mouse_pixel_position): New function.

diff -r 24e759919770 -r 55f9a506180d src/xterm.c
--- a/src/xterm.c	Fri Apr 22 21:45:11 1994 +0000
+++ b/src/xterm.c	Fri Apr 22 21:46:12 1994 +0000
@@ -5258,16 +5258,13 @@
 
 /* Mouse warping, focus shifting, raising and lowering.  */
 
+void
 x_set_mouse_position (f, x, y)
      struct frame *f;
      int x, y;
 {
   int pix_x, pix_y;
 
-#if 0 /* Let the user ask for this if he wants it.  */
-  x_raise_frame (f);
-#endif
-
   pix_x = CHAR_TO_PIXEL_COL (f, x) + FONT_WIDTH  (f->display.x->font) / 2;
   pix_y = CHAR_TO_PIXEL_ROW (f, y) + f->display.x->line_height / 2;
 
@@ -5283,6 +5280,19 @@
   UNBLOCK_INPUT;
 }
 
+/* Move the mouse to position pixel PIX_X, PIX_Y relative to frame F.  */
+
+void
+x_set_mouse_pixel_position (f, pix_x, pix_y)
+     struct frame *f;
+     int pix_x, pix_y;
+{
+  BLOCK_INPUT;
+
+  XWarpMousePointer (FRAME_X_WINDOW (f), pix_x, pix_y);
+  UNBLOCK_INPUT;
+}
+
 #ifdef HAVE_X11
 x_focus_on_frame (f)
      struct frame *f;