(Fcall_interactively): If the display hasn't already been locked by reading

from the minibuffer, lock it before executing the command.

diff --git a/src/callint.c b/src/callint.c
index 0dedc47f5091135a2c018a99c842d2872984eb8e..a1dfbe6cd29a74de39671ee2f4abbfc03fc14eaf 100644 (file)
--- a/src/callint.c
+++ b/src/callint.c
@@ -606,6 +606,10 @@ Otherwise, this is done only if an arg is read using the minibuffer.")
     if (varies[i] >= 1 && varies[i] <= 4)
       XSETINT (args[i], marker_position (args[i]));
 
+#ifdef MULTI_PERDISPLAY
+  display_locked = 1;
+#endif
+
   {
     Lisp_Object val;
     specbind (Qcommand_debug_status, Qnil);