changeset 10846:b8ea4de9a069

(Fcall_interactively): Lock the display before executing the command, no matter how we execute it.
author Karl Heuer <kwzh@gnu.org>
date Tue, 28 Feb 1995 05:26:35 +0000
parents b70748bfdc90
children c79a2dca8f75
files src/callint.c
diffstat 1 files changed, 9 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/src/callint.c	Mon Feb 27 08:05:09 1995 +0000
+++ b/src/callint.c	Tue Feb 28 05:26:35 1995 +0000
@@ -254,7 +254,12 @@
       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 @@
 	  Vcommand_history
 	    = Fcons (Fcons (function, values), Vcommand_history);
 	}
+#ifdef MULTI_PERDISPLAY
+      display_locked = 1;
+#endif
       return apply1 (function, specs);
     }