From 171bae3ac6bf827711f2485d0415c8be850ff68c Mon Sep 17 00:00:00 2001 From: Albert Zeyer Date: Tue, 12 Apr 2011 16:28:17 +0200 Subject: [PATCH] small fix for __DIE__ handling --- shairport.pl | 1 + 1 file changed, 1 insertion(+) diff --git a/shairport.pl b/shairport.pl index 543322cb..1422abf4 100755 --- a/shairport.pl +++ b/shairport.pl @@ -106,6 +106,7 @@ my $rsa = Crypt::OpenSSL::RSA->new_private_key($airport_pem) || die "RSA private my $listen; { eval { + local $SIG{'__DIE__'}; $listen = new IO::Socket::INET6(Listen => 1, Domain => AF_INET6, LocalPort => 5000,