From d2118727c8d024d96621cb1eb418958d870495fb Mon Sep 17 00:00:00 2001
From: Francois Pons <fpons@mandriva.com>
Date: Fri, 1 Sep 2000 12:48:47 +0000
Subject: *** empty log message ***

---
 perl-install/install_steps.pm | 4 +---
 1 file changed, 1 insertion(+), 3 deletions(-)

(limited to 'perl-install')

diff --git a/perl-install/install_steps.pm b/perl-install/install_steps.pm
index 28eea781c..a883ace2b 100644
--- a/perl-install/install_steps.pm
+++ b/perl-install/install_steps.pm
@@ -305,9 +305,7 @@ sub pkg_install_if_requires_satisfied {
 	my %newSelection;
 	my $pkg = pkgs::packageByName($o->{packages}, $_) || die "$_ rpm not found";
 	pkgs::selectPackage($o->{packages}, $pkg, 0, \%newSelection) foreach @l;
-	if (scalar(keys %newSelection) == 1) {
-	    pkgs::selectPackage($o->{packages}, $pkg);
-	}
+	scalar(keys %newSelection) == 1 and pkgs::selectPackage($o->{packages}, $pkg);
     }
     $o->installPackages;
 }
-- 
cgit v1.2.1