diff options
| author | Steve Hay <steve.m.hay@googlemail.com> | 2015-01-26 13:32:26 +0000 |
|---|---|---|
| committer | Steve Hay <steve.m.hay@googlemail.com> | 2015-01-26 13:32:26 +0000 |
| commit | e5cfb75eea8ddcd5dfbec72b7589b712f157ec60 (patch) | |
| tree | c7ebc1285f377df7008022c3933f2201c30543f2 | |
| parent | dcd7804b1f9631aab47f9b2adb52913907824ce8 (diff) | |
| download | perl-libnet-e5cfb75eea8ddcd5dfbec72b7589b712f157ec60.tar.gz | |
Tidy up previous merge commit
| -rw-r--r-- | lib/Net/SMTP.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/Net/SMTP.pm b/lib/Net/SMTP.pm index 426d50c..024d75b 100644 --- a/lib/Net/SMTP.pm +++ b/lib/Net/SMTP.pm @@ -20,7 +20,7 @@ use Net::Cmd; use Net::Config; use Socket; -our $VERSION = "3.061"; +our $VERSION = "3.06"; # Code for detecting if we can use SSL my $ssl_class = eval { @@ -112,7 +112,7 @@ sub new { (${*$obj}{'net_smtp_banner'}) = $obj->message; (${*$obj}{'net_smtp_domain'}) = $obj->message =~ /\A\s*(\S+)/; - if( !exists $arg{SendHello} || $arg{SendHello} ) { + if (!exists $arg{SendHello} || $arg{SendHello}) { unless ($obj->hello($arg{Hello} || "")) { my $err = ref($obj) . ": " . $obj->code . " " . $obj->message; $obj->close(); |