small fix to make prorate behave on the 1st as it did before
authorivan <ivan>
Mon, 1 May 2006 13:09:11 +0000 (13:09 +0000)
committerivan <ivan>
Mon, 1 May 2006 13:09:11 +0000 (13:09 +0000)
FS/FS/part_pkg/prorate.pm

index f5d447a..e436679 100644 (file)
@@ -43,7 +43,7 @@ sub calc_recur {
   my $mend;
   my $mstart;
   
   my $mend;
   my $mstart;
   
-  if ( $mday > $cutoff_day ) {
+  if ( $mday >= $cutoff_day ) {
     $mend =
       timelocal(0,0,0,$cutoff_day, $mon == 11 ? 0 : $mon+1, $year+($mon==11));
     $mstart =
     $mend =
       timelocal(0,0,0,$cutoff_day, $mon == 11 ? 0 : $mon+1, $year+($mon==11));
     $mstart =