From 8d73561fd83cd6cd458e332200c4b9bb0d2c84d0 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Fri, 15 Feb 2002 23:28:56 +0000
Subject: fix typo

---
 perl-install/pkgs.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/perl-install/pkgs.pm b/perl-install/pkgs.pm
index 96644b9cd..5998c9e6c 100644
--- a/perl-install/pkgs.pm
+++ b/perl-install/pkgs.pm
@@ -1070,7 +1070,7 @@ sub selectPackagesToUpgrade($$$;$$) {
 				     my $check_obsoletes = sub {
 					 my ($header) = @_;
 					 (!$v || eval(versionCompare(c::headerGetEntry($header, 'version'), $v) . $o . 0)) &&
-					   (!$r || version_compare(c::headerGetEntry($header, 'version'), $v) != 0 ||
+					   (!$r || versionCompare(c::headerGetEntry($header, 'version'), $v) != 0 ||
 					    eval(versionCompare(c::headerGetEntry($header, 'release'), $r) . $o . 0)) or return;
 					 ++$obsoleted;
 				     };
-- 
cgit v1.2.1