summaryrefslogtreecommitdiff
path: root/FS/FS/cust_event.pm
diff options
context:
space:
mode:
authorMark Wells <mark@freeside.biz>2016-04-29 17:00:54 -0700
committerMark Wells <mark@freeside.biz>2016-04-29 17:01:08 -0700
commitd66fbc1d7e47e4356cedf92a397d38aa6b8cb7a4 (patch)
treecd9dfcc8a7a24d17ca2382a8bcf6cfd46703b6ef /FS/FS/cust_event.pm
parent5ab1b3c3e1c07caa86051c757f6827abd0e44e63 (diff)
pass all event search parameters to reprint/re-email actions, #38426
Diffstat (limited to 'FS/FS/cust_event.pm')
-rw-r--r--FS/FS/cust_event.pm11
1 files changed, 7 insertions, 4 deletions
diff --git a/FS/FS/cust_event.pm b/FS/FS/cust_event.pm
index 3edfaef..93743c4 100644
--- a/FS/FS/cust_event.pm
+++ b/FS/FS/cust_event.pm
@@ -12,7 +12,7 @@ use FS::cust_bill;
use FS::cust_pay;
use FS::svc_acct;
-$DEBUG = 0;
+$DEBUG = 1;
$me = '[FS::cust_event]';
=head1 NAME
@@ -387,11 +387,14 @@ sub search_sql_where {
#}
# huh?
- if ( $param->{'event_status'} ) {
-
+ my @event_status = ref($param->{'event_status'})
+ ? @{ $param->{'event_status'} }
+ : split(',', $param->{'event_status'});
+ if ( @event_status ) {
my @status;
+
my ($done_Y, $done_N);
- foreach (@{ $param->{'event_status'} }) {
+ foreach (@event_status) {
if ($_ eq 'done_Y') {
$done_Y = 1;
} elsif ( $_ eq 'done_N' ) {