projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Revert "RT#41671 Fix double click prevention for all legacy buttons [renamed all...
[freeside.git]
/
httemplate
/
search
/
cust_event.html
diff --git
a/httemplate/search/cust_event.html
b/httemplate/search/cust_event.html
index
bd6ba69
..
241a026
100644
(file)
--- a/
httemplate/search/cust_event.html
+++ b/
httemplate/search/cust_event.html
@@
-1,4
+1,4
@@
-<
% include( 'elements/search.html'
,
+<
& elements/search.html
,
'title' => $title,
'html_init' => $html_init,
'menubar' => $menubar,
'title' => $title,
'html_init' => $html_init,
'menubar' => $menubar,
@@
-62,15
+62,14
@@
#'',
FS::UI::Web::cust_styles(),
],
#'',
FS::UI::Web::cust_styles(),
],
- )
-%>
+&>
<%once>
my $status_sub = sub {
my $cust_event = shift;
my $status = $cust_event->status;
<%once>
my $status_sub = sub {
my $cust_event = shift;
my $status = $cust_event->status;
- $status .= ': '.
$cust_event->statustext
+ $status .= ': '.
encode_entities($cust_event->statustext)
if $cust_event->statustext;
my $part_event = $cust_event->part_event;
if $cust_event->statustext;
my $part_event = $cust_event->part_event;
@@
-153,7
+152,12
@@
die "access denied"
|| $cgi->param('pkgnum') =~ /^(\d+)$/
);
|| $cgi->param('pkgnum') =~ /^(\d+)$/
);
-my $title = $cgi->param('failed') ? 'Failed billing events' : 'Billing events';
+my @statuses = $cgi->multi_param('event_status');
+my $title = 'Billing events';
+if ( $statuses[0] eq 'failed' and !defined($statuses[1]) ) {
+ # tweak the title if we're showing only failed events
+ $title = 'Failed billing events';
+}
my %search = ();
my %search = ();
@@
-162,9
+166,10
@@
for my $param (@scalars) {
$search{$param} = scalar( $cgi->param($param) )
if $cgi->param($param);
}
$search{$param} = scalar( $cgi->param($param) )
if $cgi->param($param);
}
+$search{event_status} = \@statuses;
#lists
#lists
-my @lists = qw(
payby
eventpart );
+my @lists = qw( eventpart );
foreach my $param (@lists) {
$search{$param} = [ $cgi->param($param) ];
}
foreach my $param (@lists) {
$search{$param} = [ $cgi->param($param) ];
}