[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Koha-cvs] CVS: koha/C4/Circulation Renewals.pm,1.4,1.5
From: |
Andrew Arensburger |
Subject: |
[Koha-cvs] CVS: koha/C4/Circulation Renewals.pm,1.4,1.5 |
Date: |
Sun, 13 Oct 2002 04:37:32 -0700 |
Update of /cvsroot/koha/koha/C4/Circulation
In directory usw-pr-cvs1:/tmp/cvs-serv5292
Modified Files:
Renewals.pm
Log Message:
Replaced expressions of the form "$x = $x <op> $y" with "$x <op>= $y".
Thus, $x = $x+2 becomes $x += 2, and so forth.
Index: Renewals.pm
===================================================================
RCS file: /cvsroot/koha/koha/C4/Circulation/Renewals.pm,v
retrieving revision 1.4
retrieving revision 1.5
diff -C2 -r1.4 -r1.5
*** Renewals.pm 13 Oct 2002 06:22:48 -0000 1.4
--- Renewals.pm 13 Oct 2002 11:37:30 -0000 1.5
***************
*** 203,219 ****
$dbh,$issrec->{'itemnumber'});
if ($resbor ne "") {
! $line = $line."R"; # FIXME - .=
$rstatuses[$x] ="R";
} elsif ($renewstatus == 0) {
! $line = $line."N"; # FIXME - .=
$rstatuses[$x] = "N";
} else {
! $line = $line."Y"; # FIXME - .=
$rstatuses[$x] = "Y";
}
! $line = $line.fmtdec($env,$issrec->{'renewals'},"20")." ";
! # FIXME - .=
! $line = $line.$itemdata->{'barcode'}." ".$itemdata->{'itemtype'}."
".$itemdata->{'title'};
! # FIXME - .=
$items[$x] = $line;
#debug_msg($env,$line);
--- 203,217 ----
$dbh,$issrec->{'itemnumber'});
if ($resbor ne "") {
! $line .= "R";
$rstatuses[$x] ="R";
} elsif ($renewstatus == 0) {
! $line .= "N";
$rstatuses[$x] = "N";
} else {
! $line .= "Y";
$rstatuses[$x] = "Y";
}
! $line .= fmtdec($env,$issrec->{'renewals'},"20")." ";
! $line .= $itemdata->{'barcode'}." ".$itemdata->{'itemtype'}."
".$itemdata->{'title'};
$items[$x] = $line;
#debug_msg($env,$line);
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Koha-cvs] CVS: koha/C4/Circulation Renewals.pm,1.4,1.5,
Andrew Arensburger <=