# HG changeset patch
# User Kim F. Storm <storm@cua.dk>
# Date 1124108563 0
# Node ID 62ba4ebf93525eb7fc0ee44a5e353c392ef6c7f5
# Parent  34c3bea17a3982d071ca7b995ca37bfce0c6f532
(QUIT) [!SYNC_INPUT]: Throw t to Vthrow_on_input.

diff -r 34c3bea17a39 -r 62ba4ebf9352 src/lisp.h
--- a/src/lisp.h	Mon Aug 15 10:41:09 2005 +0000
+++ b/src/lisp.h	Mon Aug 15 12:22:43 2005 +0000
@@ -1813,7 +1813,7 @@
         Lisp_Object flag = Vquit_flag;			\
 	Vquit_flag = Qnil;				\
 	if (EQ (Vthrow_on_input, flag))			\
-	  Fthrow (Vthrow_on_input, Qnil);		\
+	  Fthrow (Vthrow_on_input, Qt);			\
 	Fsignal (Qquit, Qnil);				\
       }							\
   } while (0)