X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2Fcust_main.pm;h=9462af51e0d5e5f2336f8a606a6da9825b525bb1;hb=08801a19e509891cbc5630308b927a8f553dbd28;hp=b40f18afb6c85bfded1137c3c1bb1e166fa83dc4;hpb=96eb59da15f46c0e69abd19945a46766df3474a3;p=freeside.git diff --git a/FS/FS/cust_main.pm b/FS/FS/cust_main.pm index b40f18afb..9462af51e 100644 --- a/FS/FS/cust_main.pm +++ b/FS/FS/cust_main.pm @@ -4932,10 +4932,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' => '' } ) + ) ) ; @@ -7875,10 +7877,11 @@ sub geocode { ? 'ship_' : ''; - my ($zip,$plus4) = ( '', '' ); - ($zip,$plus4) = split /-/, $self->get("${prefix}zip") + my($zip,$plus4) = split /-/, $self->get("${prefix}zip") if $self->country eq 'US'; + $zip ||= ''; + $plus4 ||= ''; #CCH specific location stuff my $extra_sql = "AND plus4lo <= '$plus4' AND plus4hi >= '$plus4'"; @@ -8291,8 +8294,8 @@ sub _money_table_where { (Class method) -Returns a qsearch hash expression to search for parameters specified in HREF. -Valid parameters are +Returns a qsearch hash expression to search for parameters specified in +HASHREF. Valid parameters are =over 4