aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
authorStefan Monnier2001-10-08 11:12:23 +0000
committerStefan Monnier2001-10-08 11:12:23 +0000
commit5ee707b8f12eb9ac8cb815f77211a07e5bd9a781 (patch)
treec0ef793b0f35aa0d66aaeecc4bf062bae9894f66 /src
parent54cbc3d4cd6541d32c02f0f5bc4decd637e2ed50 (diff)
downloademacs-5ee707b8f12eb9ac8cb815f77211a07e5bd9a781.tar.gz
emacs-5ee707b8f12eb9ac8cb815f77211a07e5bd9a781.zip
(keymap_panes, Fx_popup_menu): Use Fkeymap_prompt.
Diffstat (limited to 'src')
-rw-r--r--src/w32menu.c7
-rw-r--r--src/xmenu.c7
2 files changed, 8 insertions, 6 deletions
diff --git a/src/w32menu.c b/src/w32menu.c
index d627d889db5..a30328e7ea9 100644
--- a/src/w32menu.c
+++ b/src/w32menu.c
@@ -25,6 +25,7 @@ Boston, MA 02111-1307, USA. */
25#include "lisp.h" 25#include "lisp.h"
26#include "termhooks.h" 26#include "termhooks.h"
27#include "keyboard.h" 27#include "keyboard.h"
28#include "keymap.h"
28#include "frame.h" 29#include "frame.h"
29#include "window.h" 30#include "window.h"
30#include "blockinput.h" 31#include "blockinput.h"
@@ -394,7 +395,7 @@ keymap_panes (keymaps, nmaps, notreal)
394 P is the number of panes we have made so far. */ 395 P is the number of panes we have made so far. */
395 for (mapno = 0; mapno < nmaps; mapno++) 396 for (mapno = 0; mapno < nmaps; mapno++)
396 single_keymap_panes (keymaps[mapno], 397 single_keymap_panes (keymaps[mapno],
397 map_prompt (keymaps[mapno]), Qnil, notreal, 10); 398 Fkeymap_prompt (keymaps[mapno]), Qnil, notreal, 10);
398 399
399 finish_menu_items (); 400 finish_menu_items ();
400} 401}
@@ -727,7 +728,7 @@ cached information about equivalent key sequences.")
727 728
728 /* Search for a string appearing directly as an element of the keymap. 729 /* Search for a string appearing directly as an element of the keymap.
729 That string is the title of the menu. */ 730 That string is the title of the menu. */
730 prompt = map_prompt (keymap); 731 prompt = Fkeymap_prompt (keymap);
731 if (NILP (title) && !NILP (prompt)) 732 if (NILP (title) && !NILP (prompt))
732 title = prompt; 733 title = prompt;
733 734
@@ -755,7 +756,7 @@ cached information about equivalent key sequences.")
755 756
756 maps[i++] = keymap = get_keymap (Fcar (tem), 1, 0); 757 maps[i++] = keymap = get_keymap (Fcar (tem), 1, 0);
757 758
758 prompt = map_prompt (keymap); 759 prompt = Fkeymap_prompt (keymap);
759 if (NILP (title) && !NILP (prompt)) 760 if (NILP (title) && !NILP (prompt))
760 title = prompt; 761 title = prompt;
761 } 762 }
diff --git a/src/xmenu.c b/src/xmenu.c
index 6a7b86b1e10..e12099becf3 100644
--- a/src/xmenu.c
+++ b/src/xmenu.c
@@ -40,6 +40,7 @@ Boston, MA 02111-1307, USA. */
40#include "lisp.h" 40#include "lisp.h"
41#include "termhooks.h" 41#include "termhooks.h"
42#include "keyboard.h" 42#include "keyboard.h"
43#include "keymap.h"
43#include "frame.h" 44#include "frame.h"
44#include "window.h" 45#include "window.h"
45#include "blockinput.h" 46#include "blockinput.h"
@@ -380,7 +381,7 @@ keymap_panes (keymaps, nmaps, notreal)
380 P is the number of panes we have made so far. */ 381 P is the number of panes we have made so far. */
381 for (mapno = 0; mapno < nmaps; mapno++) 382 for (mapno = 0; mapno < nmaps; mapno++)
382 single_keymap_panes (keymaps[mapno], 383 single_keymap_panes (keymaps[mapno],
383 map_prompt (keymaps[mapno]), Qnil, notreal, 10); 384 Fkeymap_prompt (keymaps[mapno]), Qnil, notreal, 10);
384 385
385 finish_menu_items (); 386 finish_menu_items ();
386} 387}
@@ -798,7 +799,7 @@ cached information about equivalent key sequences.")
798 799
799 /* Search for a string appearing directly as an element of the keymap. 800 /* Search for a string appearing directly as an element of the keymap.
800 That string is the title of the menu. */ 801 That string is the title of the menu. */
801 prompt = map_prompt (keymap); 802 prompt = Fkeymap_prompt (keymap);
802 if (NILP (title) && !NILP (prompt)) 803 if (NILP (title) && !NILP (prompt))
803 title = prompt; 804 title = prompt;
804 805
@@ -826,7 +827,7 @@ cached information about equivalent key sequences.")
826 827
827 maps[i++] = keymap = get_keymap (Fcar (tem), 1, 0); 828 maps[i++] = keymap = get_keymap (Fcar (tem), 1, 0);
828 829
829 prompt = map_prompt (keymap); 830 prompt = Fkeymap_prompt (keymap);
830 if (NILP (title) && !NILP (prompt)) 831 if (NILP (title) && !NILP (prompt))
831 title = prompt; 832 title = prompt;
832 } 833 }