summaryrefslogtreecommitdiff
path: root/httemplate/elements/tr-select-pkg_class.html
blob: fbab0db14e9279688031337f57fb2a3951c23c2b (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>

<% } %>