From: Stefan Monnier <monnier@iro.umontreal.ca>
Date: Mon, 8 Oct 2001 11:36:45 +0000 (+0000)
Subject: (Fx_popup_menu): Use Fkeymap_prompt.
X-Git-Tag: ttn-vms-21-2-B4~19639
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=0c5b23f8ef29d76dd955986e0094549cb7c1aadf;p=emacs.git

(Fx_popup_menu): Use Fkeymap_prompt.
---

diff --git a/mac/src/macmenu.c b/mac/src/macmenu.c
index bf695214267..b7ed55adcec 100644
--- a/mac/src/macmenu.c
+++ b/mac/src/macmenu.c
@@ -33,6 +33,7 @@ Boston, MA 02111-1307, USA.  */
 #include "buffer.h"
 #include "charset.h"
 #include "coding.h"
+#include "keymap.h"
 
 #include <MacTypes.h>
 #include <Menus.h>
@@ -735,7 +736,7 @@ cached information about equivalent key sequences.")
 
       /* Search for a string appearing directly as an element of the keymap.
 	 That string is the title of the menu.  */
-      prompt = map_prompt (keymap);
+      prompt = Fkeymap_prompt (keymap);
       if (NILP (title) && !NILP (prompt))
 	title = prompt;
 
@@ -763,7 +764,7 @@ cached information about equivalent key sequences.")
 
 	  maps[i++] = keymap = get_keymap (Fcar (tem));
 
-	  prompt = map_prompt (keymap);
+	  prompt = Fkeymap_prompt (keymap);
 	  if (NILP (title) && !NILP (prompt))
 	    title = prompt;
 	}