Merge from emacs-24; up to 2012-04-30T11:57:47Z!sdl.web@gmail.com

[gnu-emacs] / src / gnutls.c

diff --git a/src/gnutls.c b/src/gnutls.c
index c5e21cc877715d26a8e50afe728422f6191453d1..9c96379ff7ed85ad33974d572d908574683ff87a 100644 (file)
--- a/src/gnutls.c
+++ b/src/gnutls.c
@@ -322,6 +322,7 @@ emacs_gnutls_handshake (struct Lisp_Process *proc)
     {
       ret = fn_gnutls_handshake (state);
       emacs_gnutls_handle_error (state, ret);
+      QUIT;
     }
   while (ret < 0 && fn_gnutls_error_is_fatal (ret) == 0);