1 files changed, 2 insertions, 1 deletions

diff --git a/src/process.c b/src/process.c
index e8900715158..f1c066f4671 100644
--- a/src/process.c
+++ b/src/process.c
@@ -3332,7 +3332,8 @@ void connect_network_socket (Lisp_Object proc, Lisp_Object ip_addresses)
       boot = Fgnutls_boot (proc, XCAR (params), XCDR (params));
       p->gnutls_boot_parameters = Qnil;
 
-      if (NILP (boot) || STRINGP (boot))
+      if (NILP (boot) || STRINGP (boot) ||
+          p->gnutls_initstage != GNUTLS_STAGE_READY)
         {
           deactivate_process (proc);
           if (NILP (boot))