diff options
| author | Thierry Vignaud <tv@mageia.org> | 2012-11-16 17:13:45 +0000 |
|---|---|---|
| committer | Thierry Vignaud <tv@mageia.org> | 2012-11-16 17:13:45 +0000 |
| commit | a3a72cd80b3a2d3458e83c8b4276b8c5b291ef10 (patch) | |
| tree | 3136133bd77e1862720d711277729d8fddacbc8d /perl-install/install/steps_gtk.pm | |
| parent | 621a9ce3334c194a97d8ba5f431468c7ffd1052a (diff) | |
| download | drakx-a3a72cd80b3a2d3458e83c8b4276b8c5b291ef10.tar drakx-a3a72cd80b3a2d3458e83c8b4276b8c5b291ef10.tar.gz drakx-a3a72cd80b3a2d3458e83c8b4276b8c5b291ef10.tar.bz2 drakx-a3a72cd80b3a2d3458e83c8b4276b8c5b291ef10.tar.xz drakx-a3a72cd80b3a2d3458e83c8b4276b8c5b291ef10.zip | |
retrieve package descriptions from XML meta-data instead of from huge hdlists
(fix not displaying packages description in network installs) (mga#549)
Diffstat (limited to 'perl-install/install/steps_gtk.pm')
| -rw-r--r-- | perl-install/install/steps_gtk.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/install/steps_gtk.pm b/perl-install/install/steps_gtk.pm index c4a612b58..a8f998f7a 100644 --- a/perl-install/install/steps_gtk.pm +++ b/perl-install/install/steps_gtk.pm @@ -405,7 +405,7 @@ sub choosePackagesTree { }, get_info => sub { my $p = install::pkgs::packageByName($packages, $_[0]) or return ''; - install::pkgs::extractHeaders([$p], $packages->{media}); + my $description = install::pkgs::get_pkg_info($p); my $imp = translate($install::pkgs::compssListDesc{$p->flag_base ? 5 : $p->rate}); @@ -415,7 +415,7 @@ sub choosePackagesTree { [ N("Version: "), $tag ], [ $p->version . '-' . $p->release . "\n" ], [ N("Size: "), $tag ], [ N("%d KB\n", $p->size / 1024) ], if_($imp, [ N("Importance: "), $tag ], [ "$imp\n" ]), - [ "\n" ], [ formatLines($p->description || N("No description")) ] ]; + [ "\n" ], [ formatLines($description) ] ]; }, toggle_nodes => sub { my $set_state = shift @_; |