From eee4b3b71251b4afbd197d13af7a2d24ee488747 Mon Sep 17 00:00:00 2001
From: Francois Pons <fpons@mandriva.com>
Date: Wed, 8 Nov 2000 15:02:02 +0000
Subject: make sure package already installed for oem are marked as selected,
 as some code refer to this state to perform some actions (install_urpmi)

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

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

diff --git a/perl-install/pkgs.pm b/perl-install/pkgs.pm
index 314c4e61d..30b990d36 100644
--- a/perl-install/pkgs.pm
+++ b/perl-install/pkgs.pm
@@ -812,6 +812,7 @@ sub selectPackagesAlreadyInstalled {
 			     my $version_rel_test = $version_cmp > 0 || $version_cmp == 0 &&
 			       versionCompare(c::headerGetEntry($header, 'release'), packageRelease($p)) >= 0;
 			     $version_rel_test or log::l("keeping an older package, avoiding selecting $p->{file}");
+			     packageSetFlagSelected($p, 1);
 			     packageSetFlagInstalled($p, 1);
 			 }
 		     });
-- 
cgit v1.2.1