diff options
Diffstat (limited to 'move')
| -rwxr-xr-x | move/tree/mdk_totem | 11 |
1 files changed, 4 insertions, 7 deletions
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; |