OPENSSL-LISTEN in write-only context failed with Bad file descriptor

CHANGES

@@ -233,6 +233,9 @@ corrections:
 	Compilation failed under some non-Linux operating systems due to use
 	of old rfd1 component
 
+	OPENSSL-LISTEN failed with "Bad file descriptor" when used in
+	write-only context
+
 porting:
 	Red Hat issue 1020203: configure checks fail with some compilers.
 	Use case: clang

xio-openssl.c

@@ -629,7 +629,7 @@ static int
       if (portname) {
        /* tcp listen; this can fork() for us; it only returns on error or on
 	  successful establishment of tcp connection */
-	 result = _xioopen_listen(xfd, xioflags,
+	 result = _xioopen_listen(xfd, (xioflags&~XIO_ACCMODE)|XIO_RDWR,
 				  (struct sockaddr *)us, uslen,
 				  opts, pf, socktype, IPPROTO_TCP,
 #if WITH_RETRY