From 887e0cbab7170d0ca51d5c4425e1d925ba545291 Mon Sep 17 00:00:00 2001 From: Karl Heuer Date: Tue, 28 Feb 1995 05:26:35 +0000 Subject: [PATCH] (Fcall_interactively): Lock the display before executing the command, no matter how we execute it. --- src/callint.c | 10 +++++++++- 1 file changed, 9 insertions(+), 1 deletion(-) diff --git a/src/callint.c b/src/callint.c index a1dfbe6cd29..1ee61d9e35f 100644 --- a/src/callint.c +++ b/src/callint.c @@ -254,7 +254,12 @@ Otherwise, this is done only if an arg is read using the minibuffer.") specs = Fcar (Fcdr (specs)); } else if (EQ (funcar, Qmocklisp)) - return ml_apply (fun, Qinteractive); + { +#ifdef MULTI_PERDISPLAY + display_locked = 1; +#endif + return ml_apply (fun, Qinteractive); + } else goto lose; @@ -306,6 +311,9 @@ Otherwise, this is done only if an arg is read using the minibuffer.") Vcommand_history = Fcons (Fcons (function, values), Vcommand_history); } +#ifdef MULTI_PERDISPLAY + display_locked = 1; +#endif return apply1 (function, specs); } -- 2.39.5