diff options
author | Thierry Vignaud <thierry.vignaud@gmail.com> | 2015-02-27 21:09:35 +0100 |
---|---|---|
committer | Thierry Vignaud <thierry.vignaud@gmail.com> | 2015-02-27 21:09:35 +0100 |
commit | 9302a308368dee9919cc3d23e597d33f1e7db729 (patch) | |
tree | 8748ba9ee76ba465d6bad6a436b5eee0ecfa1a5e | |
parent | 9594d4551246eb086205eae0113f3bf11a8b8fc1 (diff) | |
download | drakx-9302a308368dee9919cc3d23e597d33f1e7db729.tar drakx-9302a308368dee9919cc3d23e597d33f1e7db729.tar.gz drakx-9302a308368dee9919cc3d23e597d33f1e7db729.tar.bz2 drakx-9302a308368dee9919cc3d23e597d33f1e7db729.tar.xz drakx-9302a308368dee9919cc3d23e597d33f1e7db729.zip |
fix a broken message in logs
eg:
"found 9 packages to install: gnome-desktop3, 3.14.2, 1.mga5, x86_64, nmap, ..."
instead of:
"found 9 packages to install: gnome-desktop3-3.14.2-1.mga5.x86_64, nmap, ..."
-rw-r--r-- | perl-install/install/pkgs.pm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/perl-install/install/pkgs.pm b/perl-install/install/pkgs.pm index fc029294b..75f4f4cea 100644 --- a/perl-install/install/pkgs.pm +++ b/perl-install/install/pkgs.pm @@ -189,7 +189,8 @@ sub packagesToInstall { log::l("examining packagesToInstall of medium $_->{name}"); push @packages, grep { $_->flag_selected } install::media::packagesOfMedium($packages, $_); } - log::l("found " . scalar(@packages) . " packages to install: " . formatList(5, map { $_->fullname } @packages)); + log::l("found " . scalar(@packages) . " packages to install: " . formatList(5, map { scalar $_->fullname } @packages)); + @packages; } |