From: Mitch Jackson <mitch@freeside.biz>
Date: Mon, 28 Jan 2019 08:22:17 +0000 (-0500)
Subject: RT# 82010 Fix bug where selfservice payment form may not appear
X-Git-Url: http://git.freeside.biz/gitweb/?a=commitdiff_plain;h=3be65539c7aa1175b5ac34b71913c6e22fbb2c64;p=freeside.git

RT# 82010 Fix bug where selfservice payment form may not appear
---

diff --git a/fs_selfservice/FS-SelfService/cgi/change_pay.html b/fs_selfservice/FS-SelfService/cgi/change_pay.html
index 9ed621f9a..2e14151d0 100644
--- a/fs_selfservice/FS-SelfService/cgi/change_pay.html
+++ b/fs_selfservice/FS-SelfService/cgi/change_pay.html
@@ -61,6 +61,9 @@
   delete $options{'DCRD'} unless $payby eq 'DCRD' || ! exists $options{'CARD'};
   delete $options{'DCHK'} unless $payby eq 'DCHK' || ! exists $options{'CHEK'};
 
+  $payby = (keys %options)[0]
+    if !$payby && %options;
+
   HTML::Widgets::SelectLayers->new(
     options => \%options,
     selected_layer => $payby,