diff options
Diffstat (limited to 'fs_selfservice/FS-SelfService/cgi/change_pay.html')
| -rw-r--r-- | fs_selfservice/FS-SelfService/cgi/change_pay.html | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/fs_selfservice/FS-SelfService/cgi/change_pay.html b/fs_selfservice/FS-SelfService/cgi/change_pay.html index 75ceee8f7..f90f6d92b 100644 --- a/fs_selfservice/FS-SelfService/cgi/change_pay.html +++ b/fs_selfservice/FS-SelfService/cgi/change_pay.html @@ -14,7 +14,6 @@ my $tail = qq(</TABLE>). qq(<INPUT TYPE="hidden" NAME="action" VALUE="process_change_pay">). - qq(<INPUT TYPE="hidden" NAME="custpaybynum" VALUE="$custpaybynum">). qq(<BR>). qq(<INPUT TYPE="submit" NAME="process" ). qq(VALUE="Save payment information"> ). @@ -61,6 +60,9 @@ delete $options{'DCRD'} unless $payby eq 'DCRD' || ! exists $options{'CARD'}; delete $options{'DCHK'} unless $payby eq 'DCHK' || ! exists $options{'CHEK'}; + ## set default layer to first payby. + @p = keys %options; $payby = $p[0]; + HTML::Widgets::SelectLayers->new( options => \%options, selected_layer => $payby, |