(pkgs_provider) fix listing updates per importance (#41331) ;distro/mdv2008.0

regression introduced in r227983 on 2007-09-14:

"(format_pkg_simplifiedinfo) urpmi-4.10.10 enables to list all packages
update description w/o having the ia32 one overwriting/hiding the
x86_64 (or the reverse)"

2 files changed, 7 insertions, 1 deletions

diff --git a/NEWS b/NEWS
index 4b939636..bfa0a5f1 100644
--- a/NEWS
+++ b/NEWS
@@ -1,3 +1,7 @@
+- rpmdrake:
+  o fix listing updates per importance (#41331)
+    (regression introduced in 3.95 on 2007-09-14)
+
 Version 3.117.8 - 9 September 2008, Thierry Vignaud
 
 - rpmdrake:
diff --git a/Rpmdrake/gui.pm b/Rpmdrake/gui.pm
index 620f4d4b..291969d1 100644
--- a/Rpmdrake/gui.pm
+++ b/Rpmdrake/gui.pm
@@ -443,9 +443,11 @@ sub pkgs_provider {
     );
     foreach my $importance (qw(bugfix security normal)) {
         $filter_methods{$importance} = sub {
+            my @media = keys %$descriptions;
             @filtered_pkgs = grep { 
                 my ($name, $_version) = split_fullname($_);
-                $descriptions->{$name}{importance} eq $importance } @{$h->{updates}};
+                my $medium = find { $descriptions->{$_}{$name} } @media;
+                $medium && $descriptions->{$medium}{$name}{importance} eq $importance } @{$h->{updates}};
         };
     }
     $filter_methods{mandrake_choices} = $filter_methods{non_installed};