[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Koha-cvs] CVS: koha/C4 Stats.pm,1.12,1.13
From: |
Andrew Arensburger |
Subject: |
[Koha-cvs] CVS: koha/C4 Stats.pm,1.12,1.13 |
Date: |
Sun, 13 Oct 2002 04:36:21 -0700 |
Update of /cvsroot/koha/koha/C4
In directory usw-pr-cvs1:/tmp/cvs-serv5083
Modified Files:
Stats.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: Stats.pm
===================================================================
RCS file: /cvsroot/koha/koha/C4/Stats.pm,v
retrieving revision 1.12
retrieving revision 1.13
diff -C2 -r1.12 -r1.13
*** Stats.pm 13 Oct 2002 06:12:00 -0000 1.12
--- Stats.pm 13 Oct 2002 11:36:19 -0000 1.13
***************
*** 166,170 ****
my $query="Select sum(amountoutstanding) from accountlines";
if ($type eq 'fine'){
! $query=$query." where accounttype='F' or accounttype='FN'"; # FIXME
- .=
}
my $sth=$dbh->prepare($query);
--- 166,170 ----
my $query="Select sum(amountoutstanding) from accountlines";
if ($type eq 'fine'){
! $query .= " where accounttype='F' or accounttype='FN'";
}
my $sth=$dbh->prepare($query);
***************
*** 185,189 ****
and accountlines.borrowernumber = borrowers.borrowernumber";
if ($time eq 'today'){
! $query=$query." and date = now()"; # FIXME
- .=
} else {
$query.=" and date='$time'";
--- 185,189 ----
and accountlines.borrowernumber = borrowers.borrowernumber";
if ($time eq 'today'){
! $query .= " and date = now()";
} else {
$query.=" and date='$time'";
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Koha-cvs] CVS: koha/C4 Stats.pm,1.12,1.13,
Andrew Arensburger <=