From c939ac2320cc5bb6981c82dd6df3afa2d369cfcc Mon Sep 17 00:00:00 2001 From: Rafael Garcia-Suarez Date: Fri, 19 Aug 2005 15:24:27 +0000 Subject: Allow to cancel when gurpmi asks to insert a new media --- gurpmi2 | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/gurpmi2 b/gurpmi2 index f781e832..045c6705 100755 --- a/gurpmi2 +++ b/gurpmi2 @@ -196,11 +196,12 @@ sub do_install_3 () { $urpm->copy_packages_of_removable_media($list, \%sources, force_local => 1, ask_for_medium => sub { - my $w = Gtk2::MessageDialog->new($mainw, [qw(modal destroy-with-parent)], 'warning', 'ok', + my $w = Gtk2::MessageDialog->new($mainw, [qw(modal destroy-with-parent)], 'warning', 'ok-cancel', N("Please insert the medium named \"%s\" on device [%s]", $_[0], $_[1]) ); - $w->run; + my $response = $w->run; $w->destroy; + exit 0 if $response eq 'cancel'; 1; } ); -- cgit v1.2.1