mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-04 19:10:37 -08:00
Code Issues Projects Releases Wiki Activity

* xmenu.c (x_menu_in_use): Removed.

Browse source 
(x_menu_set_in_use): Also set popup_activated_flag.

* xfns.c (Fx_file_dialog): Call popup_activated instead of
x_menu_in_use.  Call x_menu_set_in_use in Motif version also.

* xterm.h: (x_menu_in_use): Removed.
This commit is contained in:
Jan Djärv 2004-11-16 20:52:32 +00:00
parent ee31cd78ef
commit 5ae53dcfca
4 changed files with 14 additions and 11 deletions
Download patch file Download diff file Expand all files Collapse all files

10
src/ChangeLog
View file

@ -1,3 +1,13 @@
2004-11-16 Jan Dj,Ad(Brv <jan.h.d@swipnet.se>
* xmenu.c (x_menu_in_use): Removed.
(x_menu_set_in_use): Also set popup_activated_flag.
* xfns.c (Fx_file_dialog): Call popup_activated instead of
x_menu_in_use. Call x_menu_set_in_use in Motif version also.
* xterm.h: (x_menu_in_use): Removed.
2004-11-16 Richard M. Stallman <rms@gnu.org>
* keymap.c (Fmap_keymap): New arg SORT-FIRST. Use

5
src/xfns.c
View file

@ -5144,7 +5144,7 @@ or directory must exist. ONLY-DIR-P is ignored." */)
GCPRO6 (prompt, dir, default_filename, mustmatch, only_dir_p, file);
if (x_menu_in_use ())
if (popup_activated ())
error ("Trying to use a menu from within a menu-entry");
CHECK_STRING (prompt);
@ -5232,6 +5232,7 @@ or directory must exist. ONLY-DIR-P is ignored." */)
record_unwind_protect (clean_up_file_dialog, make_save_value (dialog, 0));
/* Process events until the user presses Cancel or OK. */
x_menu_set_in_use (1);
result = 0;
while (result == 0)
{
@ -5297,7 +5298,7 @@ directories. */)
GCPRO6 (prompt, dir, default_filename, mustmatch, only_dir_p, file);
if (x_menu_in_use ())
if (popup_activated ())
error ("Trying to use a menu from within a menu-entry");
CHECK_STRING (prompt);

9
src/xmenu.c
View file

@ -1118,14 +1118,6 @@ on the left of the dialog box and all following items on the right.
#ifndef MSDOS
/* Return non-zero if a dialog or popup menu is already popped up. */
int
x_menu_in_use ()
{
return ! NILP (menu_items_inuse);
}
/* Set menu_items_inuse so no other popup menu or dialog is created. */
void
@ -1133,6 +1125,7 @@ x_menu_set_in_use (in_use)
int in_use;
{
menu_items_inuse = in_use ? Qt : Qnil;
popup_activated_flag = in_use;
}
/* Wait for an X event to arrive or for a timer to expire. */

1
src/xterm.h
View file

@ -1069,7 +1069,6 @@ extern void x_free_dpy_colors P_ ((Display *, Screen *, Colormap,
/* Defined in xmenu.c */
extern int x_menu_in_use P_ ((void));
extern void x_menu_set_in_use P_ ((int));
extern void x_menu_wait_for_event P_ ((void *data));
extern void x_activate_menubar P_ ((struct frame *));