From: jeff <jeff>
Date: Wed, 26 Aug 2009 20:55:29 +0000 (+0000)
Subject: improve testing need for invoicing list
X-Git-Tag: freeside_1_7_4rc3~26
X-Git-Url: http://git.freeside.biz/gitweb/?a=commitdiff_plain;h=aeea5db7d74fe946e174d4fa9baeda7cf62353a6;hp=c3687752e9c91b82ab22628d857f958e9aa57b3e;p=freeside.git

improve testing need for invoicing list
---

diff --git a/fs_selfservice/FS-SelfService/cgi/selfservice.cgi b/fs_selfservice/FS-SelfService/cgi/selfservice.cgi
index 1c6f89091..490b20f1e 100644
--- a/fs_selfservice/FS-SelfService/cgi/selfservice.cgi
+++ b/fs_selfservice/FS-SelfService/cgi/selfservice.cgi
@@ -157,13 +157,18 @@ sub process_change_ship {
 
 sub process_change_pay {
         my $postal = $cgi->param( 'postal_invoicing' );
+        my $payby  = $cgi->param( 'payby' );
         my @list =
           qw( payby payinfo payinfo1 payinfo2 month year payname
               address1 address2 city county state zip country auto paytype
               paystate ss stateid stateid_state invoicing_list
             );
         push @list, 'postal_invoicing' if $postal;
-        unless ( $postal || $cgi->param( 'invoicing_list' ) ) {
+        unless (    $payby ne 'BILL'
+                 || $postal
+                 || $cgi->param( 'invoicing_list' )
+               )
+        {
           $action = 'change_pay';
           return {
             %{&change_pay()},