From 79d407b82ed396b5496a4b31bbbf67c3153c2ce7 Mon Sep 17 00:00:00 2001
From: Rafael Garcia-Suarez <rgarciasuarez@mandriva.org>
Date: Thu, 17 Jun 2004 07:56:55 +0000
Subject: Install with a supplementary CD: allow to override the main
 compssUsers and rpmsrate

---
 perl-install/pkgs.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

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

diff --git a/perl-install/pkgs.pm b/perl-install/pkgs.pm
index a6e1ead7e..1842f68db 100644
--- a/perl-install/pkgs.pm
+++ b/perl-install/pkgs.pm
@@ -571,9 +571,9 @@ sub read_rpmsrate {
 }
 
 sub readCompssUsers {
-    my ($meta_class) = @_;
+    my ($meta_class, $file) = @_;
 
-    my $file = 'Mandrake/base/compssUsers';
+    $file = 'Mandrake/base/compssUsers' if !$file;
     my $f = $meta_class && install_any::getFile("$file.$meta_class") || install_any::getFile($file) or die "can't find $file";
     readCompssUsers_raw($f);
 }
-- 
cgit v1.2.1