summaryrefslogtreecommitdiff
path: root/httemplate/elements/tr-select-pkg_class.html
blob: 7f37e816e1fdbc70e3b221a5579ee087087eb252 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
%
%  my( $classnum, %opt ) = @_;
%
%  $opt{'pkg_class'} ||= [ qsearch( 'pkg_class', {} ) ]; # { disabled=>'' } )
%
%  #warn "***** tr-select-pkg-class: \n". Dumper(%opt);
%
% if ( scalar(@{ $opt{'pkg_class'} }) == 0 ) { 


  <INPUT TYPE="hidden" NAME="classnum" VALUE="">
% } else { 


  <TR>
    <TD ALIGN="right"><% $opt{'label'} || 'Package class' %></TD>
    <TD>
      <% include( '/elements/select-pkg_class.html', $classnum, %opt ) %>
    </TD>
  </TR>
% }