Permalink
Browse files

Merge pull request #56 from hgq/08_07_pt15475375_head

[Fixes #15475375] goto UpdateStats differently in UpdateFine()
  • Loading branch information...
2 parents 04103be + f672443 commit df739ed3c2352e43669e2c35d53157f4204a76ab @ctfliblime ctfliblime committed Jul 12, 2011
Showing with 1 addition and 1 deletion.
  1. +1 −1 C4/Overdues.pm
View
@@ -580,6 +580,7 @@ sub UpdateFine {
my $sth2 = $dbh->prepare($query);
$debug and print STDERR "UpdateFine query: $query\nw/ args: $borrowernumber, $itemnum, $amount, $desc, $amount, $amount, $nextaccntno\n";
$sth2->execute($borrowernumber, $itemnum, $amount, $desc, $amount, $amount, $nextaccntno);
+ UpdateStats( my $branch = '', my $stattype = "fine_new", $amount, my $other = '', $itemnum, my $itemtype = '', $borrowernumber, my $proccode = '' );
}
# logging action
@@ -596,7 +597,6 @@ sub UpdateFine {
$borrowernumber,
"due=".$due." amount=".$amount." itemnumber=".$itemnum
) if C4::Context->preference("FinesLog");
- UpdateStats( my $branch = '', my $stattype = "fine_new", $amount, my $other = '', $itemnum, my $itemtype = '', $borrowernumber, my $proccode = '' );
return $retnum;
}

0 comments on commit df739ed

Please sign in to comment.