aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
authorAndreas Schwab1998-04-14 13:01:59 +0000
committerAndreas Schwab1998-04-14 13:01:59 +0000
commitd52a7a92631eb442c97bec9880d881871858c8ea (patch)
tree4edabac3b0be95e2ae39f8958ab73d2875ca3180 /src
parentd6b81c0f2f99ef177fb72ccebd1723fb73196cf5 (diff)
downloademacs-d52a7a92631eb442c97bec9880d881871858c8ea.tar.gz
emacs-d52a7a92631eb442c97bec9880d881871858c8ea.zip
(parse_menu_item): Don't GCPRO non-lisp variables.
Diffstat (limited to 'src')
-rw-r--r--src/keyboard.c4
1 files changed, 2 insertions, 2 deletions
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)
5570 if (!CONSP (item)) 5570 if (!CONSP (item))
5571 return 0; 5571 return 0;
5572 5572
5573 GCPRO3 (item, notreal, inmenubar); 5573 GCPRO1 (item);
5574 5574
5575 /* Create item_properties vector if necessary. */ 5575 /* Create item_properties vector if necessary. */
5576 if (NILP (item_properties)) 5576 if (NILP (item_properties))
@@ -7899,7 +7899,7 @@ On such systems, Emacs starts a subshell instead of suspending.")
7899 /* sys_suspend can get an error if it tries to fork a subshell 7899 /* sys_suspend can get an error if it tries to fork a subshell
7900 and the system resources aren't available for that. */ 7900 and the system resources aren't available for that. */
7901 record_unwind_protect ((Lisp_Object (*) P_ ((Lisp_Object))) init_sys_modes, 7901 record_unwind_protect ((Lisp_Object (*) P_ ((Lisp_Object))) init_sys_modes,
7902 0); 7902 Qnil);
7903 stuff_buffered_input (stuffstring); 7903 stuff_buffered_input (stuffstring);
7904 if (cannot_suspend) 7904 if (cannot_suspend)
7905 sys_subshell (); 7905 sys_subshell ();