From 61eadf66eb221dc69cce290ee901f4e04f0921a8 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tv@mageia.org>
Date: Fri, 14 Dec 2012 17:13:06 +0000
Subject: (packagesToInstall) logs first packages to install

---
 perl-install/install/pkgs.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/perl-install/install/pkgs.pm b/perl-install/install/pkgs.pm
index b01ae5165..e854fd9a3 100644
--- a/perl-install/install/pkgs.pm
+++ b/perl-install/install/pkgs.pm
@@ -190,7 +190,7 @@ 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");
+    log::l("found " . scalar(@packages) . " packages to install: " . formatList(5, map { $_->fullname } @packages));
     @packages;
 }
 
-- 
cgit v1.2.1