From 7ead73532195b78e7cd54e050fb0d6dac64364d6 Mon Sep 17 00:00:00 2001
From: Giuseppe Scrivano <gscrivano@gnu.org>
Date: Fri, 18 Sep 2009 12:41:22 +0200
Subject: [PATCH] Block yield when input is blocked.

---
 src/thread.c | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/src/thread.c b/src/thread.c
index f5d5d3ce4da..4143da714b0 100644
--- a/src/thread.c
+++ b/src/thread.c
@@ -1,6 +1,7 @@
 
 #include <config.h>
 #include "lisp.h"
+#include "blockinput.h"
 #include <pthread.h>
 
 void mark_byte_stack P_ ((struct byte_stack *));
@@ -99,7 +100,7 @@ unmark_threads (void)
 int
 thread_inhibit_yield_p  ()
 {
-  return inhibit_yield_counter > 0;
+  return inhibit_yield_counter || interrupt_input_blocked;
 }
 
 static void
-- 
2.11.4.GIT