projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
update address standardization for cust_location changes
[freeside.git]
/
rt
/
share
/
html
/
Elements
/
CollectionAsTable
/
Row
diff --git
a/rt/share/html/Elements/CollectionAsTable/Row
b/rt/share/html/Elements/CollectionAsTable/Row
index
9037e5d
..
f915209
100644
(file)
--- a/
rt/share/html/Elements/CollectionAsTable/Row
+++ b/
rt/share/html/Elements/CollectionAsTable/Row
@@
-2,7
+2,7
@@
%#
%# COPYRIGHT:
%#
%#
%# COPYRIGHT:
%#
-%# This software is Copyright (c) 1996-201
1
Best Practical Solutions, LLC
+%# This software is Copyright (c) 1996-201
2
Best Practical Solutions, LLC
%# <sales@bestpractical.com>
%#
%# (Except where explicitly superseded by other copyright notices)
%# <sales@bestpractical.com>
%#
%# (Except where explicitly superseded by other copyright notices)
@@
-60,7
+60,6
@@
$Classes => ''
$m->out( '<tr class="' . $Classes . ' '
. ( $Warning ? 'warnline' : $i % 2 ? 'oddline' : 'evenline' ) . '" >'
. "\n" );
$m->out( '<tr class="' . $Classes . ' '
. ( $Warning ? 'warnline' : $i % 2 ? 'oddline' : 'evenline' ) . '" >'
. "\n" );
-use HTML::Entities;
my $item;
foreach my $column (@Format) {
if ( defined $column->{title} && $column->{title} eq 'NEWLINE' ) {
my $item;
foreach my $column (@Format) {
if ( defined $column->{title} && $column->{title} eq 'NEWLINE' ) {
@@
-77,7
+76,7
@@
foreach my $column (@Format) {
next;
}
next;
}
- my $class = $column->{class} ?
encode_entities( $column->{class}, q{'"&<>}
) : 'collection-as-table';
+ my $class = $column->{class} ?
$m->interp->apply_escapes($column->{class}, 'h'
) : 'collection-as-table';
$m->out(qq{<td class="$class" });
my %attrs;
$m->out(qq{<td class="$class" });
my %attrs;
@@
-131,7
+130,7
@@
foreach my $column (@Format) {
Arguments => [$record, $i],
);
}
Arguments => [$record, $i],
);
}
- s/\n/<br \/>/gs for grep
{ defined }
@out;
+ s/\n/<br \/>/gs for grep
defined $_,
@out;
$m->out( $_ .'="'. $m->interp->apply_escapes( $attrs{$_} => 'h' ) .'"' )
foreach grep $attrs{$_}, qw(align style colspan);
$m->out( $_ .'="'. $m->interp->apply_escapes( $attrs{$_} => 'h' ) .'"' )
foreach grep $attrs{$_}, qw(align style colspan);