Undo changes to ls_ftp in RemoteAccount.pm

Rather than sort out the underlying bug, we remove all of the plaster
so that we're back to where we had a silent "failure."

Signed-off-by: Jason Stephenson <jason@sigio.com>

diff --git a/Open-ILS/src/perlmods/lib/OpenILS/Utils/RemoteAccount.pm b/Open-ILS/src/perlmods/lib/OpenILS/Utils/RemoteAccount.pm
index b40f0dd..16feb47 100644 (file)
--- a/Open-ILS/src/perlmods/lib/OpenILS/Utils/RemoteAccount.pm
+++ b/Open-ILS/src/perlmods/lib/OpenILS/Utils/RemoteAccount.pm
@@ -646,11 +646,10 @@ sub ls_ftp {   # returns full path like: dir/path/file.ext
         my $dirtarget = $dirpath || $_;
         $dirtarget =~ s/\/+$//;
         eval { @part = $self->_ftp->ls($dirtarget) };      # this ls returns relative/path/filenames.  defer filename glob filtering for below.
-        if ($@ or !@part) {
+        if ($@) {
             $logger->error(
                 $self->_error(
-                    "ls from",  $self->remote_host, "failed with error: " . (defined($self->_ftp))
-                        ? $self->_ftp->message : $@
+                    "ls from",  $self->remote_host, "failed with error: $@"
                 )
             );
             next;