From: ivan <ivan>
Date: Tue, 10 May 2011 19:42:08 +0000 (+0000)
Subject: FTP error on "cd /" not fatal, RT#12326
X-Git-Tag: freeside_2_3_0~270
X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=commitdiff_plain;h=c64541e0cb6307925480669203ff76554f4663fe

FTP error on "cd /" not fatal, RT#12326
---

diff --git a/FS/FS/Cron/upload.pm b/FS/FS/Cron/upload.pm
index 6406c15b2..877b07fd8 100644
--- a/FS/FS/Cron/upload.pm
+++ b/FS/FS/Cron/upload.pm
@@ -179,8 +179,10 @@ sub billco_upload {
       or die "can't connect to $hostname: $@\n";
     $ftp->login($username, $password)
       or die "can't login to $hostname: ". $ftp->message."\n";
-    $ftp->cwd($path)
-      or die "can't cd $path on $hostname: ". $ftp->message. "\n";
+    unless ( $ftp->cwd($path) ) {
+      my $msg = "can't cd $path on $hostname: ". $ftp->message. "\n";
+      ( $path eq '/' ) ? warn $msg : die $msg;
+    }
     $ftp->binary
       or die "can't set binary mode on $hostname\n";