From b01ebfe5b90f2cdf6ca9fdc79e9815a633e808b4 Mon Sep 17 00:00:00 2001
From: Francois Pons <fpons@mandriva.com>
Date: Fri, 6 Sep 2002 09:45:34 +0000
Subject: changed how pkgs::remove is called.

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

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

diff --git a/perl-install/install_steps.pm b/perl-install/install_steps.pm
index 5f329bf12..eeaa95f2e 100644
--- a/perl-install/install_steps.pm
+++ b/perl-install/install_steps.pm
@@ -356,7 +356,7 @@ sub installPackages($$) { #- complete REWORK, TODO and TOCHECK!
 
     if (%{$packages->{state}{ask_remove} || {}}) {
 	log::l("removing : ", join ', ', keys %{$packages->{state}{ask_remove}});
-	pkgs::remove($o->{prefix}, [ keys %{$packages->{state}{ask_remove}} ]);
+	pkgs::remove($o->{prefix}, [ keys %{$packages->{state}{ask_remove}} ], $packages);
     }
 
     #- small transaction will be built based on this selection and depslist.
@@ -559,8 +559,6 @@ sub install_urpmi {
 				   $o->{packages}{mediums});
 	pkgs::saveCompssUsers($o->{prefix}, $o->{packages}, $o->{compssUsers}, $o->{compssUsersSorted});
     }
-
-
 }
 
 sub updateModulesFromFloppy {
-- 
cgit v1.2.1