From: ndparker <>
Date: Thu, 26 Jul 2001 20:32:29 +0000 (+0000)
Subject: CGI::Carp does not block eval errors all the time (bug?)
X-Git-Url: https://git.p6c8.net/selfforum.git/commitdiff_plain/1e5e0364f9fc5f0a3dbac69f9affbb3931115a58?ds=sidebyside

CGI::Carp does not block eval errors all the time (bug?)
---

diff --git a/selfforum-cgi/shared/Posting/Cache.pm b/selfforum-cgi/shared/Posting/Cache.pm
index b940f35..a6b3280 100644
--- a/selfforum-cgi/shared/Posting/Cache.pm
+++ b/selfforum-cgi/shared/Posting/Cache.pm
@@ -25,7 +25,7 @@ use Lock;
 #
 sub VERSION {(q$Revision$ =~ /([\d.]+)\s*$/)[0] or '0.0'}
 
-my $O_BINARY = eval "O_BINARY";
+my $O_BINARY = eval "local $SIG{__DIE__}; O_BINARY";
 $O_BINARY = 0 if ($@);
 
 ### sub new ####################################################################