diff options
Diffstat (limited to 'Rpmdrake')
-rw-r--r-- | Rpmdrake/gui.pm | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/Rpmdrake/gui.pm b/Rpmdrake/gui.pm index 9b63ddb8..05240dd1 100644 --- a/Rpmdrake/gui.pm +++ b/Rpmdrake/gui.pm @@ -65,6 +65,7 @@ our @EXPORT = qw( is_locale_available node_state pkgs_provider + real_quit reset_search set_node_state sort_callback @@ -803,6 +804,13 @@ sub is_there_selected_packages() { int(grep { $pkgs->{$_}{selected} } keys %$pkgs) } +sub real_quit() { + if (is_there_selected_packages()) { + interactive_msg(N("Some packages are selected."), N("Some packages are selected.") . "\n" . N("Do you really want to quit?"), yesno => 1) or return; + } + Gtk2->main_quit; +} + sub do_action__real { my ($options, $callback_action, $o_info) = @_; require urpm::sys; |