X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/0d6ff79fc2aae923ab03b68e15d59e0d834b77b4..ad4bebf4dfcc48d0e313bfc4cb045de485c4d9fb:/SL/File.pm

diff --git a/SL/File.pm b/SL/File.pm
index 25c6d96c1..93655f6f7 100644
--- a/SL/File.pm
+++ b/SL/File.pm
@@ -83,7 +83,7 @@ sub get_all_versions {
           $main::lxdebug->message(LXDebug->DEBUG2(), "clone version=".$clone->version." mtime=". $clone->mtime);
           push @versionobjs, $clone;
           1;
-        }
+        } or do {$::lxdebug->message(LXDebug::WARN(), "clone for version=".($maxversion-$version+1) . "failed: " . $@)};
       }
     }
   }