summaryrefslogtreecommitdiff
path: root/httemplate/elements/select-pkg_class.html
diff options
context:
space:
mode:
Diffstat (limited to 'httemplate/elements/select-pkg_class.html')
-rw-r--r--httemplate/elements/select-pkg_class.html16
1 files changed, 9 insertions, 7 deletions
diff --git a/httemplate/elements/select-pkg_class.html b/httemplate/elements/select-pkg_class.html
index 8e873ed66..f30259e55 100644
--- a/httemplate/elements/select-pkg_class.html
+++ b/httemplate/elements/select-pkg_class.html
@@ -1,10 +1,3 @@
-% 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',
@@ -14,3 +7,12 @@
%opt,
)
%>
+<%init>
+
+my %opt = @_;
+my $classnum = $opt{'curr_value'} || $opt{'value'};
+
+$opt{'records'} = delete $opt{'pkg_class'}
+ if $opt{'pkg_class'};
+
+</%init>