1 |
diff -up e-smith-base-5.2.0/root/usr/lib/perl5/site_perl/esmith/console/configure.pm.adapter-translation-fixes e-smith-base-5.2.0/root/usr/lib/perl5/site_perl/esmith/console/configure.pm |
2 |
--- e-smith-base-5.2.0/root/usr/lib/perl5/site_perl/esmith/console/configure.pm.adapter-translation-fixes 2009-11-06 13:12:01.000000000 +0100 |
3 |
+++ e-smith-base-5.2.0/root/usr/lib/perl5/site_perl/esmith/console/configure.pm 2009-11-06 13:14:27.000000000 +0100 |
4 |
@@ -102,21 +102,21 @@ sub ethernetSelect($$) |
5 |
push( @args, |
6 |
++$item . ".", |
7 |
sprintf(gettext("Manually select driver for %s ethernet adapter"), |
8 |
- $ifName), |
9 |
+ gettext($ifName)), |
10 |
); |
11 |
|
12 |
|
13 |
my ($rc, $choice) = $console->menu_page |
14 |
( |
15 |
title => sprintf(gettext("Select %s network ethernet driver"), |
16 |
- $ifName), |
17 |
+ gettext($ifName)), |
18 |
default => $default, |
19 |
text => |
20 |
sprintf(gettext("You now need to select the proper driver for your " . |
21 |
"%s network ethernet adapter. The server can attempt to do " . |
22 |
"this automatically, or you can do it manually - either by " . |
23 |
"specifying the model of your ethernet adapter or by " . |
24 |
- "directly choosing a driver.\n"), $ifName), |
25 |
+ "directly choosing a driver.\n"), gettext($ifName)), |
26 |
argsref => \@args, |
27 |
); |
28 |
|
29 |
@@ -164,7 +164,7 @@ sub ethernetManual($) |
30 |
|
31 |
my ($rc, $choice) = $console->menu_page |
32 |
( |
33 |
- title => sprintf(gettext("Select %s adapter manually"), $ifName), |
34 |
+ title => sprintf(gettext("Select %s adapter manually"), gettext($ifName)), |
35 |
text => gettext("Please select one of the following:"), |
36 |
argsref => \@args |
37 |
); |
38 |
@@ -186,8 +186,8 @@ sub ethernetManual($) |
39 |
my ($rc, $choice) = $console->menu_page |
40 |
( |
41 |
title => sprintf(gettext("Specify %s adapter and driver"), |
42 |
- $ifName), |
43 |
- text => sprintf(gettext("Please specify your %s ethernet adapter and corresponding driver"), $ifName), |
44 |
+ gettext($ifName)), |
45 |
+ text => sprintf(gettext("Please specify your %s ethernet adapter and corresponding driver"), gettext($ifName)), |
46 |
argsref => \@args |
47 |
); |
48 |
|
49 |
@@ -211,8 +211,8 @@ sub ethernetManual($) |
50 |
|
51 |
my ($rc, $choice) = $console->menu_page |
52 |
( |
53 |
- title => sprintf(gettext("Specify %s ethernet driver"), $ifName), |
54 |
- text => sprintf(gettext("Please specify the driver to use for the %s ethernet adapter"), $ifName), |
55 |
+ title => sprintf(gettext("Specify %s ethernet driver"), gettext($ifName)), |
56 |
+ text => sprintf(gettext("Please specify the driver to use for the %s ethernet adapter"), gettext($ifName)), |
57 |
argsref => \@args |
58 |
); |
59 |
|