projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
RT#40215: OFM - Separate permissions for edit dates and contract dates [better acl]
[freeside.git]
/
FS
/
FS
/
cust_event.pm
diff --git
a/FS/FS/cust_event.pm
b/FS/FS/cust_event.pm
index
3edfaef
..
93743c4
100644
(file)
--- 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;
use FS::cust_pay;
use FS::svc_acct;
-$DEBUG =
0
;
+$DEBUG =
1
;
$me = '[FS::cust_event]';
=head1 NAME
$me = '[FS::cust_event]';
=head1 NAME
@@
-387,11
+387,14
@@
sub search_sql_where {
#}
# huh?
#}
# 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 @status;
+
my ($done_Y, $done_N);
my ($done_Y, $done_N);
- foreach (@
{ $param->{'event_status'} }
) {
+ foreach (@
event_status
) {
if ($_ eq 'done_Y') {
$done_Y = 1;
} elsif ( $_ eq 'done_N' ) {
if ($_ eq 'done_Y') {
$done_Y = 1;
} elsif ( $_ eq 'done_N' ) {