X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/af4dfe1ebfbd4cbf0d618852885dc8db3aae17ef..d1e6708226f9fd63eee5fe1243896acdc751aa33:/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: " . $@)}; } } }