From 62f9085f731b12a25db4418b1b9bf6fb24d01d07 Mon Sep 17 00:00:00 2001 From: Ivan Kohler Date: Mon, 3 Jun 2013 10:16:59 -0700 Subject: [PATCH] fix per-day radius usage, RT#22699 --- FS/FS/part_pkg/sqlradacct_daily.pm | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/FS/FS/part_pkg/sqlradacct_daily.pm b/FS/FS/part_pkg/sqlradacct_daily.pm index d0d3e1006..27fc1df3e 100644 --- a/FS/FS/part_pkg/sqlradacct_daily.pm +++ b/FS/FS/part_pkg/sqlradacct_daily.pm @@ -96,15 +96,15 @@ sub calc_recur { # bill that day, we didn't have a full picture of the day's usage) # and ending with sdate exclusive (same reason) - my($l_day, $l_mon, $l_year) = (localtime($last_bill))[3,5]; + my($l_day, $l_mon, $l_year) = (localtime($last_bill))[3..5]; my $day_start = timelocal(0,0,0, $l_day, $l_mon, $l_year); - my($s_day, $s_mon, $s_year) = (localtime($$sdate))[3,5]; + my($s_day, $s_mon, $s_year) = (localtime($$sdate))[3..5]; my $billday_start = timelocal(0,0,0, $s_day, $s_mon, $s_year); while ( $day_start < $billday_start ) { - my($day, $mon, $year) = (localtime($day_start))[3,5]; + my($day, $mon, $year) = (localtime($day_start))[3..5]; my $tomorrow = timelocal_nocheck(0,0,0, $day+1, $mon, $year); #afact the usage methods already use the lower bound inclusive and the upper -- 2.11.0