diff options
-rwxr-xr-x | sbosrcarch | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -1265,7 +1265,7 @@ sub purge_pass_1_wanted { my ($cat, $name, undef) = split /\//, $_; for(keys %$dls) { my $path = "by-name/$cat/$name/" . url_to_filename($_); - $keep_filenames{$_}++; + $keep_filenames{$path}++; # TODO: populate %keep_md5sums } } |