From bb8190b63fbd965cf2e2add5a34822df0d871ea1 Mon Sep 17 00:00:00 2001 From: Rafael Garcia-Suarez Date: Tue, 31 May 2005 09:23:40 +0000 Subject: Remove unused variable --- urpm.pm | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) diff --git a/urpm.pm b/urpm.pm index fd35f9fa..b112d8c2 100644 --- a/urpm.pm +++ b/urpm.pm @@ -2875,7 +2875,7 @@ sub install_logger { } } -#- install packages according to each hashes (install or upgrade). +#- install packages according to each hash (remove, install or upgrade). sub install { my ($urpm, $remove, $install, $upgrade, %options) = @_; my @readmes; @@ -2927,7 +2927,7 @@ sub install { return N("unable to create transaction"); } - my ($update, @l, %file2pkg) = 0; + my ($update, @l) = 0; foreach (@$remove) { if ($trans->remove($_)) { @@ -2939,7 +2939,6 @@ sub install { foreach my $mode ($install, $upgrade) { foreach (keys %$mode) { my $pkg = $urpm->{depslist}[$_]; - $file2pkg{$mode->{$_}} = $pkg; $pkg->update_header($mode->{$_}); if ($trans->add($pkg, update => $update, $options{excludepath} ? (excludepath => [ split ',', $options{excludepath} ]) : ())) { -- cgit v1.2.1