From: ivan <ivan>
Date: Wed, 6 Jan 2010 04:43:46 +0000 (+0000)
Subject: eliminate ya "use of uninitialized value" warning
X-Git-Tag: root_of_svc_elec_features~559
X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=commitdiff_plain;h=59dedfd6c5b60665ecc7ea9e6e07ea45e5fdfcdd

eliminate ya "use of uninitialized value" warning
---

diff --git a/FS/FS/cust_main.pm b/FS/FS/cust_main.pm
index d9db2ed16..fc16f14a6 100644
--- a/FS/FS/cust_main.pm
+++ b/FS/FS/cust_main.pm
@@ -5043,10 +5043,12 @@ sub _new_bop_required {
   my $botpp = 'Business::OnlineThirdPartyPayment';
 
   return 1
-    if ( $conf->config('business-onlinepayment-namespace') eq $botpp ||
-         scalar( grep { $_->gateway_namespace eq $botpp } 
-                 qsearch( 'payment_gateway', { 'disabled' => '' } )
-               )
+    if (   (     $conf->exists('business-onlinepayment-namespace')
+             &&  $conf->config('business-onlinepayment-namespace') eq $botpp
+           )
+         or scalar( grep { $_->gateway_namespace eq $botpp } 
+                    qsearch( 'payment_gateway', { 'disabled' => '' } )
+                  )
        )
   ;