diff options
author | ivan <ivan> | 2002-10-07 08:47:10 +0000 |
---|---|---|
committer | ivan <ivan> | 2002-10-07 08:47:10 +0000 |
commit | 656b802d26a8eb0dfd6fd71dbcdebfab156041e9 (patch) | |
tree | bb9e12a1bdffce4c02b1351a79e3be3672191911 /FS/bin/freeside-daily | |
parent | 5c0de69821c0145e89403e173986b4d8b5b52725 (diff) |
cancel when it is *after* expiration date, not when it is *before*
Diffstat (limited to 'FS/bin/freeside-daily')
-rwxr-xr-x | FS/bin/freeside-daily | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/FS/bin/freeside-daily b/FS/bin/freeside-daily index 52028b773..17ee798ff 100755 --- a/FS/bin/freeside-daily +++ b/FS/bin/freeside-daily @@ -30,7 +30,7 @@ foreach $cust_main ( @cust_main ) { # $^T not $time because -d is for pre-printing invoices foreach my $cust_pkg ( - grep { $_->expire && $_->expire >= $^T } $cust_main->ncancelled_pkgs + grep { $_->expire && $_->expire <= $^T } $cust_main->ncancelled_pkgs ) { my $error = $cust_pkg->cancel; warn "Error cancelling expired pkg ". $cust_pkg->pkgnum. " for custnum ". |