Remove &ERROR() since it's done by WARN.

git-svn-id: https://svn.code.sf.net/p/infobot/code/trunk/blootbot@209 c11ca15a-4712-0410-83d8-924469b57eb5

diff --git a/src/Net.pl b/src/Net.pl
index fb1959cebab756fec93b7918d8c991904192b964..967bb9064cfd6f8c17ac4ab32f2012ebd9673630 100644 (file)
--- a/src/Net.pl
+++ b/src/Net.pl
@@ -22,10 +22,7 @@ sub ftpGet {
 ###    'BlockSize'     => 1024,        # ???
     );
 
-    if ($@) {
-       &ERROR("FTP: $@.");
-       return;
-    }
+    return if ($@);
 
     # login.
     if ($ftp->login()) {
@@ -110,10 +107,7 @@ sub ftpList {
     &status("FTP: opening connection to $host.") if ($verbose_ftp);
     my $ftp = Net::FTP->new($host,'Timeout'=>60);
 
-    if ($@) {
-###    &ERROR("FTP: $@.");
-       return;
-    }
+    return if ($@);
 
     # login.
     if ($ftp->login()) {