From e7445d4fc65276789af93af911419f0858663e1b Mon Sep 17 00:00:00 2001 From: "biao716.wang" Date: Tue, 3 Nov 2020 18:17:31 +0900 Subject: [PATCH] Fix bug: need to clear map before every use Change-Id: I310c8a7c9843a5b51be09e377b2bdf35433adc0c Signed-off-by: biao716.wang --- depanneur | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/depanneur b/depanneur index da134e6..670ec62 100755 --- a/depanneur +++ b/depanneur @@ -982,6 +982,7 @@ sub prepare_git { sub parse_packs { my ($config, @packs) = @_; my %packs = (); + my %tmp_sub_to_main = (); foreach my $spec_ref (@packs) { my $spec; my $base; @@ -1034,10 +1035,12 @@ sub parse_packs { subpacks => @subpacks, filename => $spec, }; + #to store the map from subpack to main pack. foreach my $sub_p (@{$packs{$name}->{subpacks}}) { - $subptomainp{$sub_p} = $name; + $tmp_sub_to_main{$sub_p} = $name; } + %subptomainp = %tmp_sub_to_main; if (@sorted) { #pick up the smallest source tag such as source0 @@ -1674,7 +1677,6 @@ sub resolve_skipped_packages() { my $fn = $to_build{$name}->{filename}; my $version = $to_build{$name}->{version}; my $release = $to_build{$name}->{release}; - my $src_rpm = "$srpm_repo_path/$name-$version-$release.src.rpm"; if (-f $src_rpm) { if ($overwrite) { -- 2.7.4