From 27e3b71aa1c30edbd21bebf0da8fea326905850b Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Mon, 1 Sep 2008 16:18:06 +0000 Subject: add some logging --- perl-install/install/steps_interactive.pm | 9 +++++---- 1 file changed, 5 insertions(+), 4 deletions(-) diff --git a/perl-install/install/steps_interactive.pm b/perl-install/install/steps_interactive.pm index 84fc58889..66ea2d15d 100644 --- a/perl-install/install/steps_interactive.pm +++ b/perl-install/install/steps_interactive.pm @@ -423,12 +423,13 @@ sub choosePackages { my ($individual, $chooseGroups); if (!$o->{isUpgrade}) { - if (install::pkgs::packageByName($o->{packages}, 'task-kde4') && - install::pkgs::packageByName($o->{packages}, 'task-gnome-minimal') && - $availableC >= 2_500_000_000) { # don't chooseDesktop if not enough place + my $tasks_ok = install::pkgs::packageByName($o->{packages}, 'task-kde4') && + install::pkgs::packageByName($o->{packages}, 'task-gnome-minimal'); + if ($tasks_ok && $availableC >= 2_500_000_000) { _chooseDesktop($o, $o->{rpmsrate_flags_chosen}, \$chooseGroups); } else { - # don't ask for desktop if kde and gnome are not available on media (useful for mini iso) + $tasks_ok ? log::l("not asking for desktop since not enough place") : + log::l("not asking for desktop since kde and gnome are not available on media (useful for mini iso)"); $chooseGroups = 1; } } -- cgit v1.2.1