From 7b0022134e62d9220095531bd89917c484434273 Mon Sep 17 00:00:00 2001 From: Stefan Siegel Date: Mon, 9 Apr 2001 18:12:33 +0000 Subject: fixed i18n bug --- perl-install/Xconfigurator.pm | 14 +++++++------- 1 file changed, 7 insertions(+), 7 deletions(-) (limited to 'perl-install') diff --git a/perl-install/Xconfigurator.pm b/perl-install/Xconfigurator.pm index cc8e02817..51d43c985 100644 --- a/perl-install/Xconfigurator.pm +++ b/perl-install/Xconfigurator.pm @@ -1335,14 +1335,14 @@ sub main { }, [ { format => sub { $_[0][0] }, val => \$f, list => [ - [ __("Change Monitor") => sub { $o->{monitor} = monitorConfiguration() } ], - [ __("Change Graphic card") => sub { $o->{card} = cardConfiguration('', 'noauto', $allowFB) } ], + [ _("Change Monitor") => sub { $o->{monitor} = monitorConfiguration() } ], + [ _("Change Graphic card") => sub { $o->{card} = cardConfiguration('', 'noauto', $allowFB) } ], if_($::expert, - [ __("Change Server options") => sub { optionsConfiguration($o) } ]), - [ __("Change Resolution") => sub { resolutionsConfiguration($o) } ], - [ __("Show information") => sub { show_info($o) } ], - [ __("Test again") => sub { $ok = testFinalConfig($o, 1) } ], - [ __("Quit") => sub { $quit = 1 } ], + [ _("Change Server options") => sub { optionsConfiguration($o) } ]), + [ _("Change Resolution") => sub { resolutionsConfiguration($o) } ], + [ _("Show information") => sub { show_info($o) } ], + [ _("Test again") => sub { $ok = testFinalConfig($o, 1) } ], + [ _("Quit") => sub { $quit = 1 } ], ], } ]); -- cgit v1.2.1