<& tr-td-label.html, 'label' => emt('Payment type'), @_ &> > <& /elements/select-payby.html, 'curr_value' => $curr_value, %opt &> <%init> my %opt = @_; my $style = $opt{'cell_style'} ? 'STYLE="'. $opt{'cell_style'}. '"' : ''; my $method = 'payby2longname'; $method = 'cust_payby2longname' if $opt{'payby_type'} eq 'cust'; unless ( $opt{'paybys'} ) { tie %{ $opt{'paybys'} }, 'Tie::IxHash', FS::payby->$method(); } my $curr_value = $opt{'curr_value'} || $opt{'value'};