diff src/xdisp.c @ 38342:8bcd8791cf6d

(add_to_log): Do nothing if called asynchronously.
author Gerd Moellmann <gerd@gnu.org>
date Tue, 10 Jul 2001 10:44:19 +0000
parents 2b6f6e16b9b6
children 919f3c722163
line wrap: on
line diff
--- a/src/xdisp.c	Tue Jul 10 08:14:32 2001 +0000
+++ b/src/xdisp.c	Tue Jul 10 10:44:19 2001 +0000
@@ -5499,6 +5499,12 @@
   int len;
   struct gcpro gcpro1, gcpro2, gcpro3, gcpro4;
 
+  /* Do nothing if called asynchronously.  Inserting text into
+     a buffer may call after-change-functions and alike and
+     that would means running Lisp asynchronously.  */
+  if (handling_signal)
+    return;
+
   fmt = msg = Qnil;
   GCPRO4 (fmt, msg, arg1, arg2);