--- trunk/lib/BackupPC/SearchLib.pm 2005/12/12 13:41:08 253 +++ trunk/lib/BackupPC/SearchLib.pm 2005/12/12 16:07:27 254 @@ -381,12 +381,14 @@ $size = (stat("${tgz}.tar.gz"))[7]; } elsif (-d $tgz) { opendir(my $dir, $tgz) || die "can't opendir $tgz: $!"; - my @parts = grep { !/^\./ && -f "$tgz/$_" } readdir($dir); + my @parts = grep { !/^\./ && !/md5/ && -f "$tgz/$_" } readdir($dir); $size = 0; foreach my $part (@parts) { $size += (stat("$tgz/$part"))[7] || die "can't stat $tgz/$part: $!"; } closedir $dir; + } else { + return -1; } return $size;