aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rwxr-xr-xsbosrcarch4
1 files changed, 2 insertions, 2 deletions
diff --git a/sbosrcarch b/sbosrcarch
index 44e60ef..f5668cd 100755
--- a/sbosrcarch
+++ b/sbosrcarch
@@ -1267,7 +1267,7 @@ sub purge_pass_1_wanted {
for(keys %$dls) {
my $path = "by-name/$cat/$name/" . url_to_filename($_);
$keep_filenames{$path}++;
- $keep_md5sums{$dls{$_}}++;
+ $keep_md5sums{$$dls{$_}}++;
}
}
@@ -1299,7 +1299,7 @@ sub purge_pass_3_wanted {
s,^\./,,; # remove leading ./
my (undef, undef, undef, $md5sum) = split /\//, $_;
- return unless defined $md5dum;
+ return unless defined $md5sum;
if($keep_md5sums{$md5sum}) {
print "keep md5sum: $md5sum\n";