Mercurial > emacs

changeset 6653:14a0a3fe93fd

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(Fx_popup_dialog): If POSITION is t, use selected frame.
author Richard M. Stallman <rms@gnu.org>
date Sun, 03 Apr 1994 19:03:23 +0000
parents a537d9d83e52
children b188651d24d6
files src/xmenu.c
diffstat 1 files changed, 9 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/src/xmenu.c	Sun Apr 03 18:19:53 1994 +0000
+++ b/src/xmenu.c	Sun Apr 03 19:03:23 1994 +0000
@@ -856,6 +856,7 @@
   /* Decode the first argument: find the window or frame to use.  */
   if (EQ (position, Qt))
     {
+#if 0 /* Using the frame the mouse is on may not be right.  */
       /* Use the mouse's current position.  */
       FRAME_PTR new_f = 0;
       Lisp_Object bar_window;
@@ -869,6 +870,14 @@
 	XSET (window, Lisp_Frame, new_f);
       else
 	window = selected_window;
+#endif
+      /* Decode the first argument: find the window and the coordinates.  */
+      if (EQ (position, Qt))
+	{
+          window = selected_window;
+          XFASTINT (x) = 0;
+          XFASTINT (y) = 0;
+	}
     }
   else if (CONSP (position))
     {