# HG changeset patch
# User Gerd Moellmann <gerd@gnu.org>
# Date 937221263 0
# Node ID 841eb01263ef4195f419dd71ecebc15f1b9456a4
# Parent  8b09c5927f1c06475b4dc3cc43aad19798f95b55
(Fx_popup_menu): Change for Lisp_Object selected_frame.
(Fx_popup_dialog): Ditto.

diff -r 8b09c5927f1c -r 841eb01263ef src/xmenu.c
--- a/src/xmenu.c	Mon Sep 13 11:14:14 1999 +0000
+++ b/src/xmenu.c	Mon Sep 13 11:14:23 1999 +0000
@@ -708,7 +708,7 @@
 	  || (CONSP (position) && EQ (XCAR (position), Qmenu_bar)))
 	{
 	  /* Use the mouse's current position.  */
-	  FRAME_PTR new_f = selected_frame;
+	  FRAME_PTR new_f = SELECTED_FRAME ();
 	  Lisp_Object bar_window;
 	  enum scroll_bar_part part;
 	  unsigned long time;
@@ -907,7 +907,7 @@
     {
 #if 0 /* Using the frame the mouse is on may not be right.  */
       /* Use the mouse's current position.  */
-      FRAME_PTR new_f = selected_frame;
+      FRAME_PTR new_f = SELECTED_FRAME ();
       Lisp_Object bar_window;
       int part;
       unsigned long time;