]> code.delx.au - gnu-emacs/blobdiff - src/lisp.h
(nnmail-extra-headers): Add defvar.
[gnu-emacs] / src / lisp.h
index 65dd4cbcea6ff1b0bef07400d5731ff0b9f2c31f..3133ef23daccbf3340aa99548e0beaac1541ad61 100644 (file)
@@ -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)