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>
% }
|