summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMitch Jackson <mitch@freeside.biz>2018-11-28 19:31:41 -0500
committerMitch Jackson <mitch@freeside.biz>2018-11-28 19:31:41 -0500
commit697a8343f7ef80f69c1b974515550afc6b794010 (patch)
treeb4ca45a0edaf7be10316568eaea40c3e33502586
parent299bcc0f7ee6583d08c23a6e39c41582264321ac (diff)
RT# 32238 Billing Event cust_birthdate - Cleaner date compare window
-rw-r--r--FS/FS/part_event/Condition/cust_birthdate.pm6
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 56ce857cf..e8ecb061a 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.