aboutsummaryrefslogtreecommitdiffstats
path: root/Rpmdrake/pkg.pm
diff options
context:
space:
mode:
authorThierry Vignaud <tv@mandriva.org>2009-10-02 10:51:26 +0000
committerThierry Vignaud <tv@mandriva.org>2009-10-02 10:51:26 +0000
commitccbfe936b4887ee59672a6f8f0f00e5314a11046 (patch)
tree4082c773a92719f7908755364cec701c41eae89d /Rpmdrake/pkg.pm
parent2951ec36abe44242fc1c74dd68e1207f75f9fdae (diff)
downloadrpmdrake-ccbfe936b4887ee59672a6f8f0f00e5314a11046.tar
rpmdrake-ccbfe936b4887ee59672a6f8f0f00e5314a11046.tar.gz
rpmdrake-ccbfe936b4887ee59672a6f8f0f00e5314a11046.tar.bz2
rpmdrake-ccbfe936b4887ee59672a6f8f0f00e5314a11046.tar.xz
rpmdrake-ccbfe936b4887ee59672a6f8f0f00e5314a11046.zip
(perform_removal) display orphan packages after removing some packages
Diffstat (limited to 'Rpmdrake/pkg.pm')
-rw-r--r--Rpmdrake/pkg.pm9
1 files changed, 9 insertions, 0 deletions
diff --git a/Rpmdrake/pkg.pm b/Rpmdrake/pkg.pm
index 0a64611c..55d76dcb 100644
--- a/Rpmdrake/pkg.pm
+++ b/Rpmdrake/pkg.pm
@@ -901,6 +901,10 @@ sub perform_removal {
my $gurpm = Rpmdrake::gurpm->new(1 ? N("Please wait") : N("Please wait, removing packages..."), N("Initializing..."), transient => $::main_window);
my $_gurpm_clean_guard = before_leaving { undef $gurpm };
+ my $may_be_orphans = 1;
+ urpm::orphans::unrequested_orphans_after_remove($urpm, \@toremove)
+ or $may_be_orphans = 0;
+
my $progress = -1;
local $urpm->{log} = sub {
my $str = $_[0];
@@ -933,6 +937,11 @@ sub perform_removal {
);
return 1;
} else {
+ if ($may_be_orphans && !$::rpmdrake_options{auto_orphans}) {
+ if (my $msg = urpm::orphans::get_now_orphans_msg($urpm)) {
+ interactive_msg(N("Information"), $msg);
+ }
+ }
return 0;
}
}