blob: 542142466c63ed6c6dcf18f645a51697c7e73710 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
  | 
%  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>
% } 
  |