From: YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp>
Date: Fri, 5 May 2006 06:44:10 +0000 (+0000)
Subject: (restore_menu_items, cleanup_popup_menu): Return a value.
X-Git-Tag: emacs-pretest-22.0.90~2811
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=0e530e3b3621737b02a1da2be74848013e57b11d;p=emacs.git

(restore_menu_items, cleanup_popup_menu): Return a value.
---

diff --git a/src/macmenu.c b/src/macmenu.c
index be565f89259..e7d69d5657c 100644
--- a/src/macmenu.c
+++ b/src/macmenu.c
@@ -318,6 +318,7 @@ restore_menu_items (saved)
   menu_items_n_panes = XINT (XCAR (saved));
   saved = XCDR (saved);  
   menu_items_submenu_depth = XINT (XCAR (saved));
+  return Qnil;
 }
 
 /* Push the whole state of menu_items processing onto the specpdl.
@@ -634,6 +635,7 @@ cleanup_popup_menu (arg)
      Lisp_Object arg;
 {
   discard_menu_items ();
+  return Qnil;
 }
 
 DEFUN ("x-popup-menu", Fx_popup_menu, Sx_popup_menu, 2, 2, 0,