summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorThierry Vignaud <thierry.vignaud@gmail.com>2015-08-28 10:17:45 -0400
committerThierry Vignaud <thierry.vignaud@gmail.com>2015-08-28 10:20:17 -0400
commit636050ee4ff15248e2f9a1900b99426957310343 (patch)
tree1468152fddf23750647bff0b025de27fa183ee68
parent8cf38512be22d2f18143fe318a746d320ce76cde (diff)
downloadurpmi-636050ee4ff15248e2f9a1900b99426957310343.tar
urpmi-636050ee4ff15248e2f9a1900b99426957310343.tar.gz
urpmi-636050ee4ff15248e2f9a1900b99426957310343.tar.bz2
urpmi-636050ee4ff15248e2f9a1900b99426957310343.tar.xz
urpmi-636050ee4ff15248e2f9a1900b99426957310343.zip
describe a cople more functions
-rw-r--r--urpm/orphans.pm50
1 files changed, 50 insertions, 0 deletions
diff --git a/urpm/orphans.pm b/urpm/orphans.pm
index 5ba1656f..9b204bfc 100644
--- a/urpm/orphans.pm
+++ b/urpm/orphans.pm
@@ -49,6 +49,12 @@ sub unrequested_list__file {
($urpm->{env_dir} || "$urpm->{root}/var/lib/rpm") . '/installed-through-deps.list';
}
+=item unrequested_list($urpm)
+
+Returns the list of potentiel files (ake files installed as requires for others)
+
+=cut
+
#- side-effects: none
sub unrequested_list {
my ($urpm) = @_;
@@ -89,6 +95,20 @@ sub mark_as_requested {
}
}
+=item _installed_req_and_unreq($urpm)
+
+Returns :
+
+=over
+
+=item * req: list of installed packages that were installed as requires of others
+
+=item * unreq: list of installed packages that were not installed as requres of others (ie the ones that were explicitely selected for install)
+
+=back
+
+=cut
+
#- side-effects:
#- + those of _installed_req_and_unreq_and_update_unrequested_list (<root>/var/lib/rpm/installed-through-deps.list)
sub _installed_req_and_unreq {
@@ -97,6 +117,20 @@ sub _installed_req_and_unreq {
($req, $unreq);
}
+=item _installed_and_unrequested_lists($urpm)
+
+Returns :
+
+=over
+
+=item * pkgs: list of installed packages
+
+=item * unrequested: list of packages that were installed as requires of others (the sum of the previous lists)
+
+=back
+
+=cut
+
#- side-effects:
#- + those of _installed_req_and_unreq_and_update_unrequested_list (<root>/var/lib/rpm/installed-through-deps.list)
sub _installed_and_unrequested_lists {
@@ -118,6 +152,22 @@ sub _write_unrequested_list__file {
".old") if !$urpm->{env_dir};
}
+=item _installed_req_and_unreq_and_update_unrequested_list ($urpm)
+
+Returns :
+
+=over
+
+=item * req: list of installed packages that were installed as requires of others
+
+=item * unreq: list of installed packages that were not installed as requres of others (ie the ones that were explicitely selected for install)
+
+=item * unrequested: list of packages that were installed as requires of others (the sum of the previous lists)
+
+=back
+
+=cut
+
#- side-effects: those of _write_unrequested_list__file
sub _installed_req_and_unreq_and_update_unrequested_list {
my ($urpm) = @_;