diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2008-09-25 07:48:33 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2008-09-25 07:48:33 +0000 |
| commit | 72021f4922a2a57af0aeeaa183e1744f1a9f678d (patch) | |
| tree | 8e880f501b7a8b9f99e180a139100727c771a339 | |
| parent | 87b8eb2be9204a78df21448ac638f2dc54820731 (diff) | |
| download | urpmi-72021f4922a2a57af0aeeaa183e1744f1a9f678d.tar urpmi-72021f4922a2a57af0aeeaa183e1744f1a9f678d.tar.gz urpmi-72021f4922a2a57af0aeeaa183e1744f1a9f678d.tar.bz2 urpmi-72021f4922a2a57af0aeeaa183e1744f1a9f678d.tar.xz urpmi-72021f4922a2a57af0aeeaa183e1744f1a9f678d.zip | |
export new_unrequested() (for future use in drakx (?))
| -rw-r--r-- | urpm/orphans.pm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/urpm/orphans.pm b/urpm/orphans.pm index 57cda207..53abb41c 100644 --- a/urpm/orphans.pm +++ b/urpm/orphans.pm @@ -110,7 +110,7 @@ sub _renamed_unrequested { } %l; } -sub _new_unrequested { +sub new_unrequested { my ($urpm, $state) = @_; ( _selected_unrequested($urpm, $state->{selected}, $state->{rejected}), @@ -121,7 +121,7 @@ sub _new_unrequested { sub add_unrequested { my ($urpm, $state) = @_; - my %l = _new_unrequested($urpm, $state); + my %l = new_unrequested($urpm, $state); append_to_file(unrequested_list__file($urpm), join('', map { "$_\t\t$l{$_}\n" } keys %l)); } @@ -275,7 +275,7 @@ sub compute_future_unrequested_orphans { my ($current_pkgs, $unrequested) = _installed_and_unrequested_lists($urpm); - put_in_hash($unrequested, { _new_unrequested($urpm, $state) }); + put_in_hash($unrequested, { new_unrequested($urpm, $state) }); my %toremove = map { $_ => 1 } URPM::removed_or_obsoleted_packages($state); my @pkgs = grep { !$toremove{$_->fullname} } @$current_pkgs; |