diff options
| author | Pascal Terjan <pterjan@mageia.org> | 2012-03-07 00:21:35 +0000 |
|---|---|---|
| committer | Pascal Terjan <pterjan@mageia.org> | 2012-03-07 00:21:35 +0000 |
| commit | 30164b74ed5c71477f4d87c0d5d173a2c2f97f0b (patch) | |
| tree | af4f22f914d63d6954a3a024e50ee9f84ef43d11 | |
| parent | 5db74f1dc698e7a2dcd03a6012941b322fa9d57a (diff) | |
| download | iurt-30164b74ed5c71477f4d87c0d5d173a2c2f97f0b.tar iurt-30164b74ed5c71477f4d87c0d5d173a2c2f97f0b.tar.gz iurt-30164b74ed5c71477f4d87c0d5d173a2c2f97f0b.tar.bz2 iurt-30164b74ed5c71477f4d87c0d5d173a2c2f97f0b.tar.xz iurt-30164b74ed5c71477f4d87c0d5d173a2c2f97f0b.zip | |
Fix previous commit
| -rwxr-xr-x | emi | 7 |
1 files changed, 5 insertions, 2 deletions
@@ -134,7 +134,10 @@ sub done_func { plog('DEBUG', "found rpm $rpm ($prefix) for section $section"); $pkg_tree{$prefix}{target} = $f; $pkg_tree{$prefix}{section}{$section}{path} = "/$f/$m/$s"; - push @{$pkg_tree{$prefix}{section}{$section}{srpms}}, $rpm if $arch eq 'src'; + if ($arch eq 'src') { + push @{$pkg_tree{$prefix}{section}{$section}{srpms}}, $rpm; + $pkg_tree{$prefix}{section}{$section}{arch}{src} = 1; + } push @{$pkg_tree{$prefix}{section}{$section}{rpms}} , $rpm; } elsif ($r =~ /(\d{14}\.\w+\.\w+\.\d+)_(.*)\.excluded$/) { my ($prefix, $arch) = ($1, $2); @@ -147,7 +150,7 @@ sub done_func { sub done_post { my ($_todo, $f, $m, $s, $r) = @_; my $section = "$m/$s"; - if ($r =~ /(\d{14}\.\w+\.\w+\.\d+)_(.*\.done)$/) { + if ($r =~ /(\d{14}\.\w+\.\w+\.\d+)_(.*)\.done$/) { my ($prefix, $arch) = ($1, $2); if (defined($pkg_tree{$prefix})) { plog('DEBUG', "found .done ($prefix, $arch)"); |