(syms_of_keyboard): Staticpro pending_funcalls.

aquamacs-emacs · May 6, 2009 · 863b01f · 863b01f
1 parent 82b9077
commit 863b01f
Show file tree

Hide file tree

Showing 2 changed files with 6 additions and 1 deletion.
diff --git a/src/ChangeLog b/src/ChangeLog
@@ -1,3 +1,7 @@
+2009-05-06  Stefan Monnier  <monnier@iro.umontreal.ca>
+
+	* keyboard.c (syms_of_keyboard): Staticpro pending_funcalls.
+
 2009-05-04  Stefan Monnier  <monnier@iro.umontreal.ca>
 
 	* Makefile.in (ctagsfiles1, ctagsfiles2): Include ObjC files in TAGS.

diff --git a/src/keyboard.c b/src/keyboard.c
@@ -4491,7 +4491,7 @@ struct input_event last_timer_event;
 
 /* List of elisp functions to call, delayed because they were generated in
    a context where Elisp could not be safely run (e.g. redisplay, signal,
-   ...).  Each lement has the form (FUN . ARGS).  */
+   ...).  Each element has the form (FUN . ARGS).  */
 Lisp_Object pending_funcalls;
 
 extern Lisp_Object Qapply;
@@ -11711,6 +11711,7 @@ void
 syms_of_keyboard ()
 {
   pending_funcalls = Qnil;
+  staticpro (&pending_funcalls);
 
   Vlispy_mouse_stem = build_string ("mouse");
   staticpro (&Vlispy_mouse_stem);