From 708efb3d343f9772cbcfb54d29a4b46cbcddfe2e Mon Sep 17 00:00:00 2001 From: Jan Michel Date: Thu, 17 Oct 2013 19:15:08 +0200 Subject: [PATCH] bugfix --- xml-db/get.pl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/xml-db/get.pl b/xml-db/get.pl index 1743b1f..2aefc61 100755 --- a/xml-db/get.pl +++ b/xml-db/get.pl @@ -3,7 +3,7 @@ use HADES::TrbNet; use Storable qw(lock_retrieve); use feature "switch"; -use if ( defined $ENV{'QUERY_STRING'}), CGI::Carp qw(fatalsToBrowser); +CGI::Carp qw(fatalsToBrowser); use if (!defined $ENV{'QUERY_STRING'}), warnings; use if (!defined $ENV{'QUERY_STRING'}), Pod::Usage; use if (!defined $ENV{'QUERY_STRING'}), Text::TabularDisplay; -- 2.43.0