diff options
| -rw-r--r-- | FS/FS/Cron/upload.pm | 6 |
1 files changed, 4 insertions, 2 deletions
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"; |