From 5d3bfef829fab0a5b0cdf16c7139c72a8cdd782b Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Wed, 6 Mar 2002 19:09:28 +0000 Subject: translate the actions --- perl-install/diskdrake/interactive.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install') diff --git a/perl-install/diskdrake/interactive.pm b/perl-install/diskdrake/interactive.pm index dda3778ee..b109474e6 100644 --- a/perl-install/diskdrake/interactive.pm +++ b/perl-install/diskdrake/interactive.pm @@ -197,7 +197,7 @@ sub main { title => 'diskdrake', messages => format_part_info($current_hd, $current_part), }, - [ { val => \$a, list => $actions, type => 'list', sort => 0, gtk => { use_boxradio => 0 } } ]) or last; + [ { val => \$a, list => $actions, format => \&translate, type => 'list', sort => 0, gtk => { use_boxradio => 0 } } ]) or last; $actions{$a}(); $current_hd = $current_part = '' if !is_part_existing($current_part, $all_hds); } else { -- cgit v1.2.1