From e6cc6f62220b078351da4da0b3ff9b43b2738101 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Mon, 1 Dec 2003 11:02:18 +0000 Subject: nicer dialog box --- move/tree/mdk_totem | 11 ++++------- 1 file changed, 4 insertions(+), 7 deletions(-) (limited to 'move') diff --git a/move/tree/mdk_totem b/move/tree/mdk_totem index cfd4d989c..9bb795d97 100755 --- a/move/tree/mdk_totem +++ b/move/tree/mdk_totem @@ -79,19 +79,16 @@ if (@busy) { my $choice = 'quit'; my @l = my %l = ( kill => N("Kill those programs"), - keep => N("Run with no CDROM support"), - quit => N("Quit"), + keep => N("No CDROM support"), ); - $in->ask_from_({ ok => undef, + $in->ask_from_({ title => N("Busy files"), messages => N("You can't use another CDROM when the following programs are running: %s", join(", ", uniq(sort @progs))) }, - [ { type => 'list', val => \$choice, list => first(list2kv(@l)), format => sub { $l{$_[0]} } } ]); + [ { type => 'list', val => \$choice, list => first(list2kv(@l)), format => sub { $l{$_[0]} } } ]) or $in->exit; - if ($choice eq 'quit') { - $in->exit; - } elsif ($choice eq 'keep') { + if ($choice eq 'keep') { exec 'totem' or $in->exit; } else { kill 15, map { $_->{pid} } @busy; -- cgit v1.2.1