[freeside-commits] branch master updated. 4f335eca5fd1efa2c823d461f7e34feded4e4990

[Ivan]

The branch, master has been updated
       via  4f335eca5fd1efa2c823d461f7e34feded4e4990 (commit)
      from  e1bf0136f69f20fb301c188d9d98e9f3ec051a6a (commit)

Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we list those
revisions in full, below.

- Log -----------------------------------------------------------------
commit 4f335eca5fd1efa2c823d461f7e34feded4e4990
Author: Ivan Kohler <ivan at freeside.biz>
Date:   Fri Jun 6 13:48:01 2014 -0700

    fix dated one-time charges with freeside-daily -d, RT#29339

diff --git a/FS/FS/Cron/bill.pm b/FS/FS/Cron/bill.pm
index 807d5cf..d3f1eb4 100644
--- a/FS/FS/Cron/bill.pm
+++ b/FS/FS/Cron/bill.pm
@@ -210,6 +210,8 @@ sub bill_where {
   my $conf = new FS::Conf;
   my $billtime = $conf->exists('next-bill-ignore-time') ? day_end($time) : $time;
 
+  # corresponds to perl checks in FS::cust_main::Billing sub bill
+  #  ("bill setup" and "bill recurring fee")
   # select * from cust_main where
   my $where_pkg = <<"END";
     EXISTS(
@@ -218,7 +220,7 @@ sub bill_where {
           AND ( cancel IS NULL OR cancel = 0 )
           AND (    ( ( cust_pkg.setup IS NULL OR cust_pkg.setup =  0 )
                      AND ( start_date IS NULL OR start_date = 0
-                           OR ( start_date IS NOT NULL AND start_date <= $^T )
+                           OR ( start_date IS NOT NULL AND start_date <= $billtime )
                          )
                    )
                 OR ( freq != '0' AND ( bill IS NULL OR bill  <= $billtime ) )

-----------------------------------------------------------------------

Summary of changes:
 FS/FS/Cron/bill.pm |    4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)