diff options
| -rw-r--r-- | perl-install/install_steps_gtk.pm | 2 | ||||
| -rw-r--r-- | perl-install/install_steps_interactive.pm | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/install_steps_gtk.pm b/perl-install/install_steps_gtk.pm index d872ba977..e0fdb64ba 100644 --- a/perl-install/install_steps_gtk.pm +++ b/perl-install/install_steps_gtk.pm @@ -286,7 +286,7 @@ sub reallyChooseGroups { my $old = $path; $path = $o->{compssUsers}{$e}{path}; ( - if_($old ne $path, new Gtk::Label($path)), + if_($old ne $path, new Gtk::Label(translate($path))), gtkpack_(new Gtk::HBox(0,0), 0, gtkpng($file), 1, $check), ) } @{$o->{compssUsersSorted}})), diff --git a/perl-install/install_steps_interactive.pm b/perl-install/install_steps_interactive.pm index b8937f29c..4725ed1e9 100644 --- a/perl-install/install_steps_interactive.pm +++ b/perl-install/install_steps_interactive.pm @@ -595,7 +595,7 @@ sub reallyChooseGroups { (map {; my $old = $path; $path = $o->{compssUsers}{$_}{path}; - if_($old ne $path, { val => $path }), + if_($old ne $path, { val => translate($path) }), { val => \$val->{$_}, type => 'bool', |