From ae794295d6620f70d6736393a3101a8dee3827aa Mon Sep 17 00:00:00 2001 From: Gerd Moellmann Date: Tue, 10 Jul 2001 10:44:40 +0000 Subject: [PATCH] (add_to_log): Do nothing if called asynchronously. --- src/ChangeLog | 4 ++++ src/xdisp.c | 6 ++++++ 2 files changed, 10 insertions(+) diff --git a/src/ChangeLog b/src/ChangeLog index 67be01f753b..0e66830d018 100644 --- a/src/ChangeLog +++ b/src/ChangeLog @@ -1,3 +1,7 @@ +2001-07-10 Gerd Moellmann + + * xdisp.c (add_to_log): Do nothing if called asynchronously. + 2001-07-09 Gerd Moellmann * sound.c (toplevel): Include and "syssignal.h". diff --git a/src/xdisp.c b/src/xdisp.c index fa775d87d1b..f0c919fecc0 100644 --- a/src/xdisp.c +++ b/src/xdisp.c @@ -5499,6 +5499,12 @@ add_to_log (format, arg1, arg2) 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); -- 2.39.2