BUG10693: Fix wrong monthnumber in PDF Bill

[ipfire-2.x.git] / src / squid-accounting / acct.pl

diff --git a/src/squid-accounting/acct.pl b/src/squid-accounting/acct.pl
index d535901b679f62ba6bb27cce76a2860b9ae9382e..79fc7bae43eede00a9444d2c5e761cf7ec60793a 100755 (executable)
--- a/src/squid-accounting/acct.pl
+++ b/src/squid-accounting/acct.pl
@@ -210,7 +210,9 @@ sub sendbill {
        my @now = localtime(time);
        $now[5] = $now[5] + 1900;
        my $actmonth = $now[4];
-       my $month                       = '0'.$actmonth if $actmonth < 10;
+       my $month;
+       $month = '0'.$actmonth if $actmonth < 10;
+       $month = '12' if $actmonth == 0;
        my $actyear  = $now[5];
        my ($from,$till)=&ACCT::getmonth($actmonth,$actyear);                                   #FIXME month and year as variables!
        my @billar = &ACCT::GetTaValues($from,$till,$rggrp);