From 354b08cb47765ca9466d9075b6d90fcf7a8e3486 Mon Sep 17 00:00:00 2001
From: tipaul <tipaul>
Date: Mon, 7 Jul 2003 14:43:58 +0000
Subject: [PATCH] removing warnings

---
 C4/SearchMarc.pm | 3 ---
 1 file changed, 3 deletions(-)

diff --git a/C4/SearchMarc.pm b/C4/SearchMarc.pm
index 777997695b..2e98e9e32b 100644
--- a/C4/SearchMarc.pm
+++ b/C4/SearchMarc.pm
@@ -140,13 +140,10 @@ sub catalogsearch {
 	}
 	chop $sql_tables;
 	my $sth;
-	warn "HERE";
 	if ($sql_where2) {
 		$sth = $dbh->prepare("select distinct m1.bibid from $sql_tables where $sql_where2 and ($sql_where1)");
-		warn("-->select m1.bibid from $sql_tables where $sql_where2 and ($sql_where1)");
 	} else {
 		$sth = $dbh->prepare("select distinct m1.bibid from $sql_tables where $sql_where1");
-		warn("==>select m1.bibid from $sql_tables where $sql_where1");
 	}
 	$sth->execute;
 	my @result;
-- 
2.39.5