X-Git-Url: http://www.git.stargrave.org/?a=blobdiff_plain;f=lib%2FPublicInbox%2FTLS.pm;h=86e6331d5ea2df97f7cd4c22ba9898f83b275cbd;hb=0d38f65c490466837ae091afa7a7b6f59d04ce7c;hp=1bbb229adbcd7f6cc8c60c076ea18b3a5a1d4978;hpb=55b707d788ce13696e4411389583e720ea6dab01;p=public-inbox.git
diff --git a/lib/PublicInbox/TLS.pm b/lib/PublicInbox/TLS.pm
index 1bbb229a..86e6331d 100644
--- a/lib/PublicInbox/TLS.pm
+++ b/lib/PublicInbox/TLS.pm
@@ -1,4 +1,4 @@
-# Copyright (C) 2019 all contributors
+# Copyright (C) 2019-2020 all contributors
# License: AGPL-3.0+
# IO::Socket::SSL support code
@@ -6,6 +6,7 @@ package PublicInbox::TLS;
use strict;
use IO::Socket::SSL;
use PublicInbox::Syscall qw(EPOLLIN EPOLLOUT);
+use Carp qw(carp);
sub err () { $SSL_ERROR }
@@ -13,7 +14,8 @@ sub err () { $SSL_ERROR }
sub epollbit () {
return EPOLLIN if $SSL_ERROR == SSL_WANT_READ;
return EPOLLOUT if $SSL_ERROR == SSL_WANT_WRITE;
- die "unexpected SSL error: $SSL_ERROR";
+ carp "unexpected SSL error: $SSL_ERROR";
+ undef;
}
1;