1 files changed, 1 insertions, 1 deletions

diff --git a/src/lisp.h b/src/lisp.h
index 65dd4cbcea6..3133ef23dac 100644
--- a/src/lisp.h
+++ b/src/lisp.h
@@ -1813,7 +1813,7 @@ extern int interrupt_input_pending;
         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)