Search.pm -- Dates.pm (the correct way) and remove hard coded (on) DEBUG variable!

Signed-off-by: Joshua Ferraro <jmf@liblime.com>

diff --git a/C4/Search.pm b/C4/Search.pm
index ab0d407..f004c9c 100644 (file)
--- a/C4/Search.pm
+++ b/C4/Search.pm
@@ -21,13 +21,15 @@ use C4::Context;
 use C4::Biblio;    # GetMarcFromKohaField
 use C4::Koha;      # getFacets
 use Lingua::Stem;
-use C4::Date;
+use C4::Dates qw(format_date);
 
-use vars qw($VERSION @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS);
+use vars qw($VERSION @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS $DEBUG);
 
 # set the version for version checking
-$VERSION = 3.00;
-$DEBUG=1;
+BEGIN {
+       $VERSION = 3.01;
+       $DEBUG = ($ENV{DEBUG}) ? 1 : 0;
+}
 
 =head1 NAME