summaryrefslogtreecommitdiff
path: root/httemplate/elements/tr-fixed.html
blob: 3e115d69af2ed3ebf127dd3285a5c3ec2fa47a36 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
<& tr-td-label.html, @_ &>

  <TD <% $style %> <% $colspan %>><% $value %></TD>

</TR>

<& hidden.html, %opt &>

<%init>

my %opt = @_;

my $style = $opt{'cell_style'}
              ? ' STYLE="'. $opt{'cell_style'}. '" '
              : ' STYLE="color:#666666" ';

my $colspan = $opt{'colspan'} ? ' COLSPAN="'. $opt{'colspan'}. '" ' : '';

my $value = $opt{'formatted_value'} || $opt{'curr_value'} || $opt{'value'};
$value = $opt{'prefix'} . $value if defined($opt{'prefix'});

unless ( $opt{'noescape'} ) {
  #compatibility with select-table and friends
  if ( $opt{'multiple'} ) {
    $value = [ split(/\s*,\s*/, $value) ] if !ref $value;
    $value = join('<BR>', map {encode_entities($_)} @$value);
  } else {
    $value = encode_entities($value)
  }
}

</%init>