From 845ea73d811a50cd8998c807fce688ff1e2da599 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Wed, 31 Aug 2005 11:03:26 +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 9f001f9fb..fcb0f8bfd 100644
--- a/perl-install/pkgs.pm
+++ b/perl-install/pkgs.pm
@@ -1236,7 +1236,7 @@ sub remove_marked_ask_remove {
 sub remove {
     my ($to_remove) = @_;
 
-    log::l("removing: " . join(' ', @to_remove));
+    log::l("removing: " . join(' ', @$to_remove));
     
     my $db = rpmDbOpenForInstall() or die "error opening RPM database: ", URPM::rpmErrorString();
     my $trans = $db->create_transaction($::prefix);
-- 
cgit v1.2.1