change next bill date comparison from < to <=
authorivan <ivan>
Sat, 1 Mar 2003 03:15:01 +0000 (03:15 +0000)
committerivan <ivan>
Sat, 1 Mar 2003 03:15:01 +0000 (03:15 +0000)
FS/FS/cust_main.pm

index 807fadb..6331fda 100644 (file)
@@ -979,7 +979,7 @@ sub bill {
     my $sdate;
     if ( $part_pkg->getfield('freq') > 0 &&
          ! $cust_pkg->getfield('susp') &&
-         ( $cust_pkg->getfield('bill') || 0 ) < $time
+         ( $cust_pkg->getfield('bill') || 0 ) <= $time
     ) {
       my $recur_prog = $part_pkg->getfield('recur');
       $recur_prog =~ /^(.*)$/ or do {