diff options
| author | Thierry Vignaud <tv@mageia.org> | 2012-12-06 09:38:39 +0000 |
|---|---|---|
| committer | Thierry Vignaud <tv@mageia.org> | 2012-12-06 09:38:39 +0000 |
| commit | 5ae632c14a4fff631d5cbd301369128236dd5657 (patch) | |
| tree | dafbf894e3ee06ccf3a6410488deca3e3570a93a /Rpmdrake/pkg.pm | |
| parent | d54fa1477163b705006da7add417fb310caf3fe4 (diff) | |
| download | rpmdrake-5ae632c14a4fff631d5cbd301369128236dd5657.tar rpmdrake-5ae632c14a4fff631d5cbd301369128236dd5657.tar.gz rpmdrake-5ae632c14a4fff631d5cbd301369128236dd5657.tar.bz2 rpmdrake-5ae632c14a4fff631d5cbd301369128236dd5657.tar.xz rpmdrake-5ae632c14a4fff631d5cbd301369128236dd5657.zip | |
(get_pkgs) add a fix for a rare crash (mga#7439)
Diffstat (limited to 'Rpmdrake/pkg.pm')
| -rw-r--r-- | Rpmdrake/pkg.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Rpmdrake/pkg.pm b/Rpmdrake/pkg.pm index 19d4fed9..fe758998 100644 --- a/Rpmdrake/pkg.pm +++ b/Rpmdrake/pkg.pm @@ -575,7 +575,7 @@ sub get_pkgs { installable => \@installable_pkgs, updates => \@updates, meta_pkgs => \@meta_pkgs, - gui_pkgs => [ grep { member(($all_pkgs{$_}{pkg}->fullname)[0], @gui_pkgs) } keys %all_pkgs ], + gui_pkgs => [ grep { my $p = $all_pkgs{$_}{pkg}; $p && member(($p->fullname)[0], @gui_pkgs) } keys %all_pkgs ], update_descr => $update_descr, backports => [ @inactive_backports, @active_backports ], inactive_backports => \@inactive_backports |