From b208ad0f999b3e5802f5c99a962ddee959023885 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Tue, 6 Jan 2009 16:14:36 +0000 Subject: enhance doc --- urpm/orphans.pm | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'urpm/orphans.pm') diff --git a/urpm/orphans.pm b/urpm/orphans.pm index b1e277f8..e6d983e5 100644 --- a/urpm/orphans.pm +++ b/urpm/orphans.pm @@ -161,6 +161,7 @@ sub unrequested_orphans_after_remove { sub _unrequested_orphans_after_remove_once { my ($urpm, $db, $unrequested, $toremove) = @_; + # first we get the list of requires/suggests that may be unneeded after removing $toremove my @requires; foreach my $fn (keys %$toremove) { my ($n) = $fn =~ $fullname2name_re; @@ -179,7 +180,7 @@ sub _unrequested_orphans_after_remove_once { $unrequested->{$p->name} or return; $p->provides_overlap($req) or return; - # cool we have a "unrequested" package that will potentially be unneeded + # cool, $p is "unrequested" and will potentially be newly unneeded if (_check_potential_unrequested_package_newly_unneeded($urpm, $db, $toremove, $p)) { $urpm->{debug}("installed " . $p->fullname . " can now be removed") if $urpm->{debug}; return 1; -- cgit v1.2.1