From: tipaul <tipaul>
Date: Mon, 7 Jul 2003 14:43:58 +0000 (+0000)
Subject: removing warnings
X-Git-Tag: R_2-0-0pre2~25
X-Git-Url: http://koha-dev.rot13.org:8081/gitweb/?a=commitdiff_plain;h=354b08cb47765ca9466d9075b6d90fcf7a8e3486;p=koha_fer

removing warnings
---

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;