blob: 8e873ed660d2f703be7c02589ad1d47c99685159 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
|
% my( $classnum, %opt ) = @_;
%
% $opt{'records'} = delete $opt{'pkg_class'}
% if $opt{'pkg_class'};
%
% #warn "***** select-pkg-class: \n". Dumper(%opt);
%
<% include( '/elements/select-table.html',
'table' => 'pkg_class',
'name_col' => 'classname',
'value' => $classnum,
'empty_label' => '(none)',
'hashref' => { 'disabled' => '' },
%opt,
)
%>
|