From 515a0eb0a98668245fee0a5758fbc4a2b4c4aa7a Mon Sep 17 00:00:00 2001
From: Rafael Garcia-Suarez <rgarciasuarez@mandriva.org>
Date: Fri, 13 May 2005 06:35:33 +0000
Subject: packages lists in non-update modes were broken

---
 rpmdrake | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/rpmdrake b/rpmdrake
index d75dd871..de51d36c 100755
--- a/rpmdrake
+++ b/rpmdrake
@@ -1299,17 +1299,17 @@ Then, restart %s.", $rpmdrake::myname_update)), myexit(-1);
     @update_medias = grep { !$_->{ignore} && $_->{update} } @{$urpm->{media}};
     check_update_media_version($urpm, @update_medias);
 
+    $urpm->compute_installed_flags(db()) unless $updates;
     my $requested = {};
     $urpm->request_packages_to_upgrade(
 	db(),
 	{}, #- $state,
 	$requested,
-	requested => undef,
 	start => 0,
 	end   => $#{$urpm->{depslist}},
     );
+    $urpm->{depslist}[$_]->set_flag_installed foreach keys %$requested; #- pretend it's installed
 
-    $urpm->{depslist}[$_]->set_flag_installed for keys %$requested; #- pretend it's installed
     foreach my $pkg (@{$urpm->{depslist}}) {
 	$pkg->flag_upgrade or next;
         my $selected = 0;
-- 
cgit v1.2.1