[Koha-cvs] koha/circ branchtransfers.pl

[Robert Lyon]

CVSROOT:        /sources/koha
Module name:    koha
Changes by:     Robert Lyon <bob_lyon>  06/06/07 03:29:19

Modified files:
        circ           : branchtransfers.pl 

Log message:
        merging katipo changes...
        
        frbranchcd was being passed tobranch info from transferbook

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/circ/branchtransfers.pl?cvsroot=koha&r1=1.21&r2=1.22

Patches:
Index: branchtransfers.pl
===================================================================
RCS file: /sources/koha/koha/circ/branchtransfers.pl,v
retrieving revision 1.21
retrieving revision 1.22
diff -u -b -r1.21 -r1.22
--- branchtransfers.pl  26 Oct 2005 09:13:11 -0000      1.21
+++ branchtransfers.pl  7 Jun 2006 03:29:19 -0000       1.22
@@ -119,17 +119,17 @@
 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;