[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Koha-cvs] koha/circ branchtransfers.pl
From: |
Robert Lyon |
Subject: |
[Koha-cvs] koha/circ branchtransfers.pl |
Date: |
Wed, 07 Jun 2006 03:29:19 +0000 |
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;
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Koha-cvs] koha/circ branchtransfers.pl,
Robert Lyon <=