From 11a414089fcfb521eb7b0f12f3a55327d2c72af2 Mon Sep 17 00:00:00 2001
From: tipaul <tipaul>
Date: Mon, 3 Nov 2003 13:29:05 +0000
Subject: [PATCH] removing warning

---
 C4/Koha.pm | 1 -
 1 file changed, 1 deletion(-)

diff --git a/C4/Koha.pm b/C4/Koha.pm
index cb3f3087da..94cb2f26b1 100644
--- a/C4/Koha.pm
+++ b/C4/Koha.pm
@@ -195,7 +195,6 @@ sub getbranches {
 		my $nsth = $dbh->prepare($query);
 		$nsth->execute($branch->{'branchcode'});
 		while (my ($cat) = $nsth->fetchrow_array) {
-		warn "XX";
 			# FIXME - This seems wrong. It ought to be
 			# $branch->{categorycodes}{$cat} = 1;
 			# otherwise, there's a namespace collision if there's a
-- 
2.39.5