summaryrefslogtreecommitdiffstats
path: root/urpm/orphans.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2008-09-25 07:48:33 +0000
committerPascal Rigaux <pixel@mandriva.com>2008-09-25 07:48:33 +0000
commit72021f4922a2a57af0aeeaa183e1744f1a9f678d (patch)
tree8e880f501b7a8b9f99e180a139100727c771a339 /urpm/orphans.pm
parent87b8eb2be9204a78df21448ac638f2dc54820731 (diff)
downloadurpmi-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 (?))
Diffstat (limited to 'urpm/orphans.pm')
-rw-r--r--urpm/orphans.pm6
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;