From e1ae3c30935d77a0e27cc6441ebf7cf5c109721e Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Mon, 12 Mar 2001 21:00:37 +0000 Subject: (setPackages): don't readCompssUsers with $o->{packages} --- perl-install/install_any.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install') diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm index e36ef986f..041df95b9 100644 --- a/perl-install/install_any.pm +++ b/perl-install/install_any.pm @@ -316,7 +316,7 @@ sub setPackages { $o->{compss} = pkgs::readCompss($o->{prefix}, $o->{packages}); #- must be done after getProvides pkgs::read_rpmsrate($o->{packages}, getFile("Mandrake/base/rpmsrate")); - ($o->{compssUsers}, $o->{compssUsersSorted}) = pkgs::readCompssUsers($o->{packages}, $o->{meta_class}); + ($o->{compssUsers}, $o->{compssUsersSorted}) = pkgs::readCompssUsers($o->{meta_class}); if ($::auto_install && !$o->{compssUsersChoice}) { $o->{compssUsersChoice}{$_} = 1 foreach map { @{$o->{compssUsers}{$_}{flags}} } @{$o->{compssUsersSorted}}; -- cgit v1.2.1