From: Paul Eggert <eggert@cs.ucla.edu>
Date: Sat, 2 Apr 2011 02:42:05 +0000 (-0700)
Subject: * keyboard.c (menu_bar_items, read_char_minibuf_menu_prompt):
X-Git-Tag: emacs-pretest-24.0.90~104^2~275^2~394^2~58
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=e5a2a5cbf4374b615f841ae421062ec52e492a71;p=emacs.git

* keyboard.c (menu_bar_items, read_char_minibuf_menu_prompt):

Remove vars that are set but not used.
---

diff --git a/src/ChangeLog b/src/ChangeLog
index a147bd12cf4..16edc6cbf5d 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,5 +1,8 @@
 2011-04-02  Paul Eggert  <eggert@cs.ucla.edu>
 
+	* keyboard.c (menu_bar_items, read_char_minibuf_menu_prompt):
+	Remove vars that are set but not used.
+
 	* gtkutil.c (xg_get_file_with_chooser): Mark var as initialized.
 
 	* image.c (lookup_image): Remove var that is set but not used.
diff --git a/src/keyboard.c b/src/keyboard.c
index d307250b868..679d99b0117 100644
--- a/src/keyboard.c
+++ b/src/keyboard.c
@@ -7357,8 +7357,6 @@ menu_bar_items (Lisp_Object old)
 
   Lisp_Object def, tail;
 
-  Lisp_Object result;
-
   int mapno;
   Lisp_Object oquit;
 
@@ -7419,8 +7417,6 @@ menu_bar_items (Lisp_Object old)
 
   /* Look up in each map the dummy prefix key `menu-bar'.  */
 
-  result = Qnil;
-
   for (mapno = nmaps - 1; mapno >= 0; mapno--)
     if (!NILP (maps[mapno]))
       {
@@ -8494,7 +8490,6 @@ read_char_minibuf_menu_prompt (int commandflag, int nmaps, Lisp_Object *maps)
       int notfirst = 0;
       int i = nlength;
       Lisp_Object obj;
-      int ch;
       Lisp_Object orig_defn_macro;
 
       /* Loop over elements of map.  */
@@ -8664,8 +8659,6 @@ read_char_minibuf_menu_prompt (int commandflag, int nmaps, Lisp_Object *maps)
 	return obj;
       else if (XINT (obj) == -2)
         return obj;
-      else
-	ch = XINT (obj);
 
       if (! EQ (obj, menu_prompt_more_char)
 	  && (!INTEGERP (menu_prompt_more_char)