# HG changeset patch
# User Stefan Monnier <monnier@iro.umontreal.ca>
# Date 1241573413 0
# Node ID 5f8f851b71b91a58bee1c5ea7ff598953c0457f1
# Parent  276b0724ed864edac92a735e2539dd40d01cca1c
(syms_of_keyboard): Staticpro pending_funcalls.

diff -r 276b0724ed86 -r 5f8f851b71b9 src/ChangeLog
--- a/src/ChangeLog	Tue May 05 04:17:27 2009 +0000
+++ b/src/ChangeLog	Wed May 06 01:30:13 2009 +0000
@@ -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 -r 276b0724ed86 -r 5f8f851b71b9 src/keyboard.c
--- a/src/keyboard.c	Tue May 05 04:17:27 2009 +0000
+++ b/src/keyboard.c	Wed May 06 01:30:13 2009 +0000
@@ -4491,7 +4491,7 @@
 
 /* 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 @@
 syms_of_keyboard ()
 {
   pending_funcalls = Qnil;
+  staticpro (&pending_funcalls);
 
   Vlispy_mouse_stem = build_string ("mouse");
   staticpro (&Vlispy_mouse_stem);