From: Andreas Schwab <schwab@suse.de>
Date: Tue, 14 Apr 1998 13:01:59 +0000 (+0000)
Subject: (parse_menu_item): Don't GCPRO non-lisp variables.
X-Git-Tag: emacs-20.3~1548
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=d52a7a92631eb442c97bec9880d881871858c8ea;p=emacs.git

(parse_menu_item): Don't GCPRO non-lisp variables.
---

diff --git a/src/keyboard.c b/src/keyboard.c
index b6b00127630..9c56699d7e4 100644
--- a/src/keyboard.c
+++ b/src/keyboard.c
@@ -5570,7 +5570,7 @@ parse_menu_item (item, notreal, inmenubar)
   if (!CONSP (item))
     return 0;
 
-  GCPRO3 (item, notreal, inmenubar);
+  GCPRO1 (item);
 
   /* Create item_properties vector if necessary.  */
   if (NILP (item_properties))
@@ -7899,7 +7899,7 @@ On such systems, Emacs starts a subshell instead of suspending.")
   /* sys_suspend can get an error if it tries to fork a subshell
      and the system resources aren't available for that.  */
   record_unwind_protect ((Lisp_Object (*) P_ ((Lisp_Object))) init_sys_modes,
-			 0);
+			 Qnil);
   stuff_buffered_input (stuffstring);
   if (cannot_suspend)
     sys_subshell ();