diff options
Diffstat (limited to 'lisp/net/tls.el')
| -rw-r--r-- | lisp/net/tls.el | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/lisp/net/tls.el b/lisp/net/tls.el index 821daba6f6b..d4fa8c2e73c 100644 --- a/lisp/net/tls.el +++ b/lisp/net/tls.el @@ -238,6 +238,10 @@ Fourth arg PORT is an integer specifying a port to connect to." (setq process (start-process name buffer shell-file-name shell-command-switch formatted-cmd)) + (funcall (if (fboundp 'set-process-query-on-exit-flag) + 'set-process-query-on-exit-flag + 'process-kill-without-query) + process nil) (while (and process (memq (process-status process) '(open run)) (progn |