From 1e5e0364f9fc5f0a3dbac69f9affbb3931115a58 Mon Sep 17 00:00:00 2001
From: ndparker <>
Date: Thu, 26 Jul 2001 20:32:29 +0000
Subject: [PATCH] CGI::Carp does not block eval errors all the time (bug?)

---
 selfforum-cgi/shared/Posting/Cache.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

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 ####################################################################
-- 
2.34.1