From 8504b48b0d69bf6fb580059506ca2383d902faff Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Wed, 8 Aug 2001 22:16:52 +0000
Subject: (remove, remove_nodeps): fix typo

---
 perl-install/install_any.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

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

diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm
index 896d535b5..870d91643 100644
--- a/perl-install/install_any.pm
+++ b/perl-install/install_any.pm
@@ -992,7 +992,7 @@ sub remove {
 	my $p = pkgs::packageByName($do->{o}->{packages}, $_);
 	pkgs::unselectPackage($do->{o}->{packages}, $p) if $p;
 	$p;
-    }
+    } @l;
     run_program::rooted($do->{o}->{prefix}, 'rpm', '-e', @l);
 }
 
@@ -1003,7 +1003,7 @@ sub remove_nodeps {
 	my $p = pkgs::packageByName($do->{o}->{packages}, $_);
 	pkgs::packageSetFlagSelected($p, 0) if $p;
 	$p;
-    }
+    } @l;
     run_program::rooted($do->{o}->{prefix}, 'rpm', '-e', '--nodeps', @l);
 }
 ################################################################################
-- 
cgit v1.2.1