From 7815cb8fdfd7626bec11907a1c079ed9c29c0d3f Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tv@mandriva.org>
Date: Mon, 25 Aug 2008 09:28:52 +0000
Subject: (get_pkgs) split out meta package list in their own local variable
 (needed for next commits)

---
 Rpmdrake/pkg.pm | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

(limited to 'Rpmdrake')

diff --git a/Rpmdrake/pkg.pm b/Rpmdrake/pkg.pm
index 58bad0f2..7d7d48ec 100644
--- a/Rpmdrake/pkg.pm
+++ b/Rpmdrake/pkg.pm
@@ -524,6 +524,8 @@ sub get_pkgs {
     # urpmi only care about the first medium where it found the package,
     # so there's no need to list the same package several time:
     @installable_pkgs = uniq(difference2(\@installable_pkgs, \@updates));
+
+    my @meta_pkgs = grep { /^task-|^basesystem/ } keys %all_pkgs;
  
     my @gui_pkgs = map { chomp; $_ } cat_('/usr/share/rpmdrake/gui.lst');
 
@@ -532,7 +534,7 @@ sub get_pkgs {
        installed => \@installed_pkgs,
        installable => \@installable_pkgs,
        updates => \@updates,
-       meta_pkgs => [ grep { /^task-|^basesystem/ } keys %all_pkgs ],
+       meta_pkgs => \@meta_pkgs,
        gui_pkgs => [ grep { member(($all_pkgs{$_}{pkg}->fullname)[0], @gui_pkgs) } keys %all_pkgs ],
        update_descr => $update_descr,
        backports => \@backports,
-- 
cgit v1.2.1