diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2006-11-09 21:36:05 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2006-11-09 21:36:05 +0000 |
commit | 8d966f041c59a701cf9dfdd46fe6f4240fb1edda (patch) | |
tree | 70703f7e020954a95a36160c52560ace633d2a1c /urpm.pm | |
parent | b24f6fd844bc9d3bdb01d1bdf5886e37ce146633 (diff) | |
download | urpmi-8d966f041c59a701cf9dfdd46fe6f4240fb1edda.tar urpmi-8d966f041c59a701cf9dfdd46fe6f4240fb1edda.tar.gz urpmi-8d966f041c59a701cf9dfdd46fe6f4240fb1edda.tar.bz2 urpmi-8d966f041c59a701cf9dfdd46fe6f4240fb1edda.tar.xz urpmi-8d966f041c59a701cf9dfdd46fe6f4240fb1edda.zip |
simplify
Diffstat (limited to 'urpm.pm')
-rw-r--r-- | urpm.pm | 9 |
1 files changed, 5 insertions, 4 deletions
@@ -3049,7 +3049,7 @@ sub install { $options{callback_open} ||= sub { my ($_data, $_type, $id) = @_; $fh = $urpm->open_safe('<', $install->{$id} || $upgrade->{$id}); - return defined $fh ? fileno $fh : undef; + $fh ? fileno $fh : undef; }; $options{callback_close} ||= sub { my ($urpm, undef, $pkgid) = @_; @@ -3295,9 +3295,10 @@ sub removed_packages { sub translate_why_removed { my ($urpm, $state, @l) = @_; map { - my ($from) = keys %{$state->{rejected}{$_}{closure}}; - my ($whyk) = keys %{$state->{rejected}{$_}{closure}{$from}}; - my $whyv = $state->{rejected}{$_}{closure}{$from}{$whyk}; + my $closure = $state->{rejected}{$_}{closure}; + my ($from) = keys %$closure; + my ($whyk) = keys %{$closure->{$from}}; + my $whyv = $closure->{$from}{$whyk}; my $frompkg = $urpm->search($from, strict_fullname => 1); my $s; for ($whyk) { |