diff options
author | Mitch Jackson <mitch@freeside.biz> | 2018-11-28 19:31:41 -0500 |
---|---|---|
committer | Mitch Jackson <mitch@freeside.biz> | 2018-11-28 19:36:31 -0500 |
commit | 04656428015eb43d8441ec35cb0646b05d5743f4 (patch) | |
tree | c38f47fc440dc6a778c8b7f8f47928a350d8d307 /FS/FS/part_event | |
parent | f49e004a02ae65209524071af08076508fc47692 (diff) |
RT# 32238 Billing Event cust_birthdate - Cleaner date compare window
Diffstat (limited to 'FS/FS/part_event')
-rw-r--r-- | FS/FS/part_event/Condition/cust_birthdate.pm | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/FS/FS/part_event/Condition/cust_birthdate.pm b/FS/FS/part_event/Condition/cust_birthdate.pm index 56ce857..e8ecb06 100644 --- a/FS/FS/part_event/Condition/cust_birthdate.pm +++ b/FS/FS/part_event/Condition/cust_birthdate.pm @@ -43,8 +43,10 @@ sub condition { die "Unparsable timeframe given: ".$self->option('timeframe'); } - my $ck_dt = DateTime->from_epoch( epoch => $opt{time} ); - my $bd_dt = DateTime->from_epoch( epoch => $birthdate ); + my $ck_dt = DateTime->from_epoch( epoch => $opt{time} ) + ->truncate( to => 'day' ); + my $bd_dt = DateTime->from_epoch( epoch => $birthdate ) + ->truncate( to => 'day' ); # Find the birthday for this calendar year. If customer birthday # has already passed this year, find the birthday for next year. |