From: ivan <ivan>
Date: Mon, 5 Oct 2009 18:17:55 +0000 (+0000)
Subject: oops, handle old cust_main.pm properly (should we be bothering?) :/ RT#5889
X-Git-Tag: root_of_svc_elec_features~807
X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=commitdiff_plain;h=2caddb16574bf73c3687b959656b7ee2f851937f

oops, handle old cust_main.pm properly (should we be bothering?) :/ RT#5889
---

diff --git a/httemplate/misc/payment.cgi b/httemplate/misc/payment.cgi
index 8d7baa5da..813b560bd 100644
--- a/httemplate/misc/payment.cgi
+++ b/httemplate/misc/payment.cgi
@@ -300,8 +300,12 @@ my $fee = '';
 my $fee_pkg = '';
 my $fee_display = '';
 my $fee_op = '';
+my $num_payments = scalar($cust_main->cust_pay);
+#handle old cust_main.pm (remove...)
+$num_payments = scalar( @{ [ $cust_main->cust_pay ] } )
+  unless defined $num_payments;
 if ( $conf->config('manual_process-pkgpart')
-     and ! $conf->exists('manual_process-skip_first') || $cust_main->cust_pay
+     and ! $conf->exists('manual_process-skip_first') || $num_payments
    )
 {