From 31fb2c2e9d3025bc7dbad038c632ab8a34a9a310 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Sun, 16 Sep 2001 20:35:31 +0000
Subject: more up to my need ALL flag in compssUsersChoice

---
 perl-install/install_any.pm | 3 +++
 1 file changed, 3 insertions(+)

(limited to 'perl-install/install_any.pm')

diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm
index 6990cc418..01178f014 100644
--- a/perl-install/install_any.pm
+++ b/perl-install/install_any.pm
@@ -357,6 +357,9 @@ sub setPackages {
 	pkgs::read_rpmsrate($o->{packages}, getFile("Mandrake/base/rpmsrate"));
 	($o->{compssUsers}, $o->{compssUsersSorted}) = pkgs::readCompssUsers($o->{meta_class});
 
+	if ($::auto_install && $o->{compssUsersChoice}{ALL}) {
+	    $o->{compssUsersChoice}{$_} = 1 foreach map { @{$o->{compssUsers}{$_}{flags}} } @{$o->{compssUsersSorted}};
+	}
 	if (!$o->{compssUsersChoice} && !$o->{isUpgrade}) {
 	    #- by default, choose:
 	    $o->{compssUsersChoice}{$_} = 1 foreach 'GNOME', 'KDE', 'CONFIG';
-- 
cgit v1.2.1