wip

[cgi-auth-flexible.git] / test.cgi

diff --git a/test.cgi b/test.cgi
index fb67d4c40c851c30b2863f23ceed973626b8f67f..918b7f878c236278f0ae649caf1f84d34028d73a 100755 (executable)
--- a/test.cgi
+++ b/test.cgi
@@ -5,6 +5,8 @@ use warnings;
 use CGI;
 use CGI::Auth::Flexible;
 use URI;
+#use Carp::Always;
+$SIG{__DIE__} = sub { Carp::confess(@_) };
 
 my $dump = "$ENV{'CAHTEST_HOME'}/dump";