===================================================================
RCS file: /cvsrepo/anoncvs/cvs/src/usr.bin/ftp/fetch.c,v
retrieving revision 1.162
retrieving revision 1.163
diff -u -r1.162 -r1.163
--- src/usr.bin/ftp/fetch.c	2017/03/02 09:29:53	1.162
+++ src/usr.bin/ftp/fetch.c	2017/03/07 08:00:23	1.163
@@ -1,4 +1,4 @@
-/*	$OpenBSD: fetch.c,v 1.162 2017/03/02 09:29:53 sthen Exp $	*/
+/*	$OpenBSD: fetch.c,v 1.163 2017/03/07 08:00:23 sunil Exp $	*/
 /*	$NetBSD: fetch.c,v 1.14 1997/08/18 10:20:20 lukem Exp $	*/
 
 /*-
@@ -1031,7 +1031,9 @@
 cleanup_url_get:
 #ifndef NOSSL
 	if (tls != NULL) {
-		tls_close(tls);
+		do {
+			i = tls_close(tls);
+		} while (i == TLS_WANT_POLLIN || i == TLS_WANT_POLLOUT);
 		tls_free(tls);
 	}
 	free(full_host);