From 13115cefd51dbae124b0467fbe2bad408ae8c983 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/steps_gtk.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install/install/steps_gtk.pm') 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