From d72117e06bf24160ee444cfea2c2a9f3d3db42e5 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Mon, 23 Apr 2012 17:28:07 +0000 Subject: (choosePackagesTree) fix passing ->{media} to extractHeaders (was a missmerge) --- perl-install/install/NEWS | 3 +++ perl-install/install/steps_gtk.pm | 2 +- 2 files changed, 4 insertions(+), 1 deletion(-) (limited to 'perl-install') diff --git a/perl-install/install/NEWS b/perl-install/install/NEWS index 2d28b2ab7..92dc7c1f9 100644 --- a/perl-install/install/NEWS +++ b/perl-install/install/NEWS @@ -1,3 +1,6 @@ +- individual package selection: + o fix a crash + Version 14.9 - 23 April 2012 - include missing perl modules (mga#5528) diff --git a/perl-install/install/steps_gtk.pm b/perl-install/install/steps_gtk.pm index 6909ec7b3..5d4936b67 100644 --- a/perl-install/install/steps_gtk.pm +++ b/perl-install/install/steps_gtk.pm @@ -402,7 +402,7 @@ sub choosePackagesTree { }, get_info => sub { my $p = install::pkgs::packageByName($packages, $_[0]) or return ''; - install::pkgs::extractHeaders([$p], $packages); + install::pkgs::extractHeaders([$p], $packages->{media}); my $imp = translate($install::pkgs::compssListDesc{$p->flag_base ? 5 : $p->rate}); -- cgit v1.2.1