From b0e0f03a5a259140d2a17ded5eb92f123bcb9d73 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tv@mageia.org>
Date: Wed, 28 Mar 2012 18:42:26 +0000
Subject: (_build_tree) silent perl_checker & explain

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

diff --git a/Rpmdrake/gui.pm b/Rpmdrake/gui.pm
index 51262b56..f1ac09f3 100644
--- a/Rpmdrake/gui.pm
+++ b/Rpmdrake/gui.pm
@@ -960,7 +960,8 @@ sub _build_tree {
     # better loop on packages, create groups tree and push packages in the proper place:
     foreach my $pkg (@elems) {
         my $grp = $pkg->[1];
-        add_parent($grp);
+        # no state for groups (they're not packages and thus have no state)
+        add_parent($grp, undef);
         $elems->{$grp} ||= [];
         push @{$elems->{$grp}}, $pkg;
     }
-- 
cgit v1.2.1