httemplate/elements/tr-radio.html

   1 % foreach my $option ( @{ $opt{options} } ) { #just arrayref for now
   2
   3   <% include('tr-td-label.html', @_, label=> $labels->{$option} || $option ) %>
   4
   5     <TD <% $style %>>
   6       <% include('radio.html', @_, value=> $option ) %>
   7     </TD>
   8
   9   </TR>
  10
  11 % }
  12 <%init>
  13
  14 my %opt = @_;
  15
  16 my $labels = $opt{'option_labels'} || $opt{'labels'};
  17
  18 my $style = $opt{'cell_style'} ? 'STYLE="'. $opt{'cell_style'}. '"' : '';
  19
  20 </%init>
  21