diff options
| author | Ivan Kohler <ivan@freeside.biz> | 2016-03-25 12:29:35 -0700 |
|---|---|---|
| committer | Ivan Kohler <ivan@freeside.biz> | 2016-03-25 12:29:35 -0700 |
| commit | f4ee374e9bbb313234278c7231c046f8e07086f0 (patch) | |
| tree | 7970d625af88eb07792b5aab5b3b6f8bafa087fc | |
| parent | da9ab0af53220f6f1cb0e4d31ce7de81dd591783 (diff) | |
avoid uninitialized value errors on upgrade
| -rw-r--r-- | FS/FS/Upgrade.pm | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/FS/FS/Upgrade.pm b/FS/FS/Upgrade.pm index 2a480f872..eb2587b34 100644 --- a/FS/FS/Upgrade.pm +++ b/FS/FS/Upgrade.pm @@ -203,8 +203,9 @@ sub upgrade_overlimit_groups { sub upgrade_invoice_from { my ($conf, $agentnum, $agentonly) = @_; if ( - (!$conf->exists('invoice_from_name',$agentnum,$agentonly)) && - ($conf->config('invoice_from',$agentnum,$agentonly) =~ /\<(.*)\>/) + ! $conf->exists('invoice_from_name',$agentnum,$agentonly) + && $conf->exists('invoice_from',$agentnum,$agentonly) + && $conf->config('invoice_from',$agentnum,$agentonly) =~ /\<(.*)\>/ ) { my $realemail = $1; $realemail =~ s/^\s*//; # remove leading spaces |