diff options
| author | Thierry Vignaud <tv@mageia.org> | 2012-03-15 12:17:13 +0000 |
|---|---|---|
| committer | Thierry Vignaud <tv@mageia.org> | 2012-03-15 12:17:13 +0000 |
| commit | 99405741040a80ddd6d35dc982cf59cef171f609 (patch) | |
| tree | acf1d66da29632c759a27510dfc000106fd665e9 | |
| parent | f6e4d6e99e41fb0e41753f61fa2453f2f6c459ee (diff) | |
| download | mgatools-99405741040a80ddd6d35dc982cf59cef171f609.tar mgatools-99405741040a80ddd6d35dc982cf59cef171f609.tar.gz mgatools-99405741040a80ddd6d35dc982cf59cef171f609.tar.bz2 mgatools-99405741040a80ddd6d35dc982cf59cef171f609.tar.xz mgatools-99405741040a80ddd6d35dc982cf59cef171f609.zip | |
add comments
| -rw-r--r-- | pm/MGATools/rpmsrate.pm | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/pm/MGATools/rpmsrate.pm b/pm/MGATools/rpmsrate.pm index 06ed2a2..d6c611b 100644 --- a/pm/MGATools/rpmsrate.pm +++ b/pm/MGATools/rpmsrate.pm @@ -114,6 +114,7 @@ sub cleanrpmsrate { } elsif (my ($pg, $loc) = /^(.*)-([^-+]+)$/) { if ($potloc{$pg}) { my $pkg; + # try to lookup package in urpm first (if we got an $urpm and if media were parsed): $pkg = $o_urpm->{rpm}{$o_urpm->{rpmkey}{key}{$key}} if ref($o_urpm); # if package is not urpmi' synthesis, try to parse it directly: @@ -122,6 +123,7 @@ sub cleanrpmsrate { $pkg = $urpm2->{depslist}[$id]; } + # still nothing? bailout: if (!$pkg) { print "ERROR cleanrpmsrate: parse_rpm $dir/$rpm ($key) failed\n"; next; @@ -209,6 +211,7 @@ sub cleanrpmsrate { } } + # process localized packages (eg: man-pages-XX, hunspell-XX, firefox-XX, ...) if ($locale{$d} && $localized_pkg{$c}) { foreach (sort @{$locale{$d}}) { next if member($flat_path, @{$done{"$d-$_"}}); |