diff options
author | ivan <ivan> | 2010-03-31 06:30:35 +0000 |
---|---|---|
committer | ivan <ivan> | 2010-03-31 06:30:35 +0000 |
commit | 6097db7667840f4a65c0012da009528635a7f82e (patch) | |
tree | f04be98c9296a0fca1b0b700b88405a92de316d0 /FS/FS/Misc.pm | |
parent | 0e0512c9ede1e4042887e764f1909cadf12bbfb4 (diff) |
eliminate harmless "Use of uninitialized value $enc in string eq" warnings
Diffstat (limited to 'FS/FS/Misc.pm')
-rw-r--r-- | FS/FS/Misc.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/FS/FS/Misc.pm b/FS/FS/Misc.pm index 39be1fb5a..d973feb9f 100644 --- a/FS/FS/Misc.pm +++ b/FS/FS/Misc.pm @@ -343,14 +343,14 @@ sub send_email { $smtp_opt{'port'} = $port; my $transport; - if ( $enc eq 'starttls' ) { + if ( defined($enc) && $enc eq 'starttls' ) { $smtp_opt{$_} = $conf->config("smtp-$_") for qw(username password); $transport = Email::Sender::Transport::SMTP::TLS->new( %smtp_opt ); } else { if ( $conf->exists('smtp-username') && $conf->exists('smtp-password') ) { $smtp_opt{"sasl_$_"} = $conf->config("smtp-$_") for qw(username password); } - $smtp_opt{'ssl'} = 1 if $enc eq 'tls'; + $smtp_opt{'ssl'} = 1 if defined($enc) && $enc eq 'tls'; $transport = Email::Sender::Transport::SMTP->new( %smtp_opt ); } |