> all % foreach my $option ( @{ $opt{'statuses'} } ) { ><% $option %> % } <%init> my( $status, %opt ) = @_; $opt{'statuses'} ||= [ FS::cust_pkg->statuses() ]; # { disabled=>'' } ) if ( exists $opt{'onchange'} && $opt{'onchange'} ) { $opt{'onchange'} = ' onChange="' . $opt{'onchange'}. '"'; } else { $opt{'onchange'} = ''; }