Handle . in tar

This commit is contained in:
Jamie Cameron
2007-12-03 20:19:11 +00:00
parent e0e2133666
commit f1b34a0c19

View File

@@ -438,10 +438,10 @@ else {
if (/^[^\/]+\/(\S+)$/) {
$hasfile{$1}++;
}
if (/^(webmin-([0-9\.]+)\/[^\/]+)$/) {
if (/^(webmin-([0-9\.]+)\/([^\/]+))$/ && $3 ne ".") {
push(@topfiles, $1);
}
elsif (/^webmin-[0-9\.]+\/([^\/]+)\//) {
elsif (/^webmin-[0-9\.]+\/([^\/]+)\// && $1 ne ".") {
$intar{$1}++;
}
}