From 0c5c1cf72b208fe6ddd08d188174bef57c3df5e2 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Sun, 26 Mar 1995 21:13:40 +0000 Subject: [PATCH] (Fmouse_position--both definitions): Pass 0 for `insist'. (Fmouse_pixel_position): Pass 0 for `insist'. Add HAVE_MOUSE conditional. --- src/frame.c | 8 +++++--- 1 file changed, 5 insertions(+), 3 deletions(-) diff --git a/src/frame.c b/src/frame.c index f0e146cd36..d1b70fdaa7 100644 --- a/src/frame.c +++ b/src/frame.c @@ -1058,7 +1058,7 @@ and nil for X and Y.") #ifdef HAVE_MOUSE /* It's okay for the hook to refrain from storing anything. */ if (mouse_position_hook) - (*mouse_position_hook) (&f, + (*mouse_position_hook) (&f, 0, &lispy_dummy, &party_dummy, &x, &y, &long_dummy); @@ -1095,12 +1095,14 @@ and nil for X and Y.") f = selected_frame; x = y = Qnil; +#ifdef HAVE_MOUSE /* It's okay for the hook to refrain from storing anything. */ if (mouse_position_hook) - (*mouse_position_hook) (&f, + (*mouse_position_hook) (&f, 0, &lispy_dummy, &party_dummy, &x, &y, &long_dummy); +#endif XSETFRAME (lispy_dummy, f); return Fcons (lispy_dummy, Fcons (x, y)); } @@ -2144,7 +2146,7 @@ DEFUN ("mouse-position", Fmouse_position, Smouse_position, 0, 0, 0, Lisp_Object x, y; unsigned long long_dummy; - (*mouse_position_hook) (&f, + (*mouse_position_hook) (&f, 0, &lispy_dummy, &party_dummy, &x, &y, &long_dummy); -- 2.20.1