ds: consolidate IO::Socket::SSL checks

We need to be careful about handling EAGAIN on write(2)
failures deal with SSL_WANT_READ vs SSL_WANT_WRITE as
appropriate.

1 files changed, 3 insertions, 6 deletions

diff --git a/lib/PublicInbox/TLS.pm b/lib/PublicInbox/TLS.pm
index 576c11d7..0b9a55df 100644
--- a/lib/PublicInbox/TLS.pm
+++ b/lib/PublicInbox/TLS.pm
@@ -13,12 +13,9 @@ sub err () { $SSL_ERROR }
 
 # returns the EPOLL event bit which matches the existing SSL error
 sub epollbit () {
-        if ($! == EAGAIN) {
-                return EPOLLIN if $SSL_ERROR == SSL_WANT_READ;
-                return EPOLLOUT if $SSL_ERROR == SSL_WANT_WRITE;
-                die "unexpected SSL error: $SSL_ERROR";
-        }
-        0;
+        return EPOLLIN if $SSL_ERROR == SSL_WANT_READ;
+        return EPOLLOUT if $SSL_ERROR == SSL_WANT_WRITE;
+        die "unexpected SSL error: $SSL_ERROR";
 }
 
 1;