From 92d88b35a76ca002f01daad597bc179c1ade6378 Mon Sep 17 00:00:00 2001
From: bob_lyon <bob_lyon>
Date: Wed, 7 Jun 2006 03:29:19 +0000
Subject: [PATCH] merging katipo changes...

frbranchcd was being passed tobranch info from transferbook
---
 circ/branchtransfers.pl | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/circ/branchtransfers.pl b/circ/branchtransfers.pl
index fe42edec2e..175b7bfb9d 100755
--- a/circ/branchtransfers.pl
+++ b/circ/branchtransfers.pl
@@ -119,17 +119,17 @@ my %transfereditems;
 my %frbranchcds;
 my %tobranchcds;
 my $color=$linecolor2;
-
+my $transfered;
 my $barcode = $query->param('barcode');
 if ($barcode) {
-	my $transfered;
+
 	my $iteminformation;
 	($transfered, $messages, $iteminformation)
 			= transferbook($tobranchcd, $barcode, $ignoreRs);
 	$found = $messages->{'ResFound'};
 	if ($transfered) {
 		my %item;
-		my $frbranchcd = $iteminformation->{'holdingbranch'};
+		my $frbranchcd = $iteminformation->{'frbranchcd'};
 		if (not ($found)) {
 			($color eq $linecolor1) ? ($color=$linecolor2) : ($color=$linecolor1);
 			$item{'color'}=$color;
-- 
2.20.1