From 12cf1799fedbc9face6b93a970ccc55070737726 Mon Sep 17 00:00:00 2001
From: Joe Atzberger <joe.atzberger@liblime.com>
Date: Fri, 7 Dec 2007 17:38:24 -0600
Subject: [PATCH] Search.pm -- Dates.pm (the correct way) and remove hard coded
 (on) DEBUG variable!

Signed-off-by: Joshua Ferraro <jmf@liblime.com>
---
 C4/Search.pm | 10 ++++++----
 1 file changed, 6 insertions(+), 4 deletions(-)

diff --git a/C4/Search.pm b/C4/Search.pm
index ab0d4070c9..f004c9c75a 100644
--- 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
 
-- 
2.39.5