From 3ae2edde0a8c4105ff4db1eb6422f5346dffc429 Mon Sep 17 00:00:00 2001
From: Chris Cormack <crc@liblime.com>
Date: Thu, 27 Dec 2007 16:47:21 -0600
Subject: [PATCH] Getting rid of noisy warn

Signed-off-by: Joshua Ferraro <jmf@liblime.com>
---
 C4/Biblio.pm | 1 -
 1 file changed, 1 deletion(-)

diff --git a/C4/Biblio.pm b/C4/Biblio.pm
index 3a8383af72..6e440e5d4e 100755
--- a/C4/Biblio.pm
+++ b/C4/Biblio.pm
@@ -3458,7 +3458,6 @@ sub GetNoZebraIndexes {
     my %indexes;
     foreach my $line (split /('|"),/,$index) {
         $line =~ /(.*)=>(.*)/;
-warn $line;
         my $index = substr($1,1); # get the index, don't forget to remove initial ' or "
         my $fields = $2;
         $index =~ s/'|"|\s//g;
-- 
2.39.5