1 |
burnat |
1.1 |
diff -Nur -x '*.orig' -x '*.rej' e-smith-base-4.18.0/root/sbin/e-smith/console-menu-items/manageRAID.pl mezzanine_patched_e-smith-base-4.18.0/root/sbin/e-smith/console-menu-items/manageRAID.pl |
2 |
|
|
--- e-smith-base-4.18.0/root/sbin/e-smith/console-menu-items/manageRAID.pl 2008-03-08 20:42:00.000000000 +1100 |
3 |
|
|
+++ mezzanine_patched_e-smith-base-4.18.0/root/sbin/e-smith/console-menu-items/manageRAID.pl 2008-03-08 16:38:54.000000000 +1100 |
4 |
|
|
@@ -162,7 +162,7 @@ |
5 |
|
|
|
6 |
|
|
sub get_raid_status |
7 |
|
|
{ |
8 |
|
|
- die "Couldn't open /proc/mdstat:$!\n" |
9 |
|
|
+ die gettext("Couldn't open") . " /proc/mdstat:$!\n" |
10 |
|
|
unless (open(MDSTAT, "/proc/mdstat")); |
11 |
|
|
|
12 |
|
|
my @mdstat; |
13 |
|
|
@@ -179,7 +179,7 @@ |
14 |
|
|
{ |
15 |
|
|
my @devices = (); |
16 |
|
|
|
17 |
|
|
- die "Couldn't call mdadm: $!\n" |
18 |
|
|
+ die gettext("Couldn't call") . " mdadm: $!\n" |
19 |
|
|
unless open(MDADM, "/sbin/mdadm --detail --scan|"); |
20 |
|
|
|
21 |
|
|
while (<MDADM>) |
22 |
|
|
@@ -192,7 +192,7 @@ |
23 |
|
|
|
24 |
|
|
for my $dev (@devices) |
25 |
|
|
{ |
26 |
|
|
- die "Couldn't call mdadm --detail $dev: $!\n" |
27 |
|
|
+ die gettext("Couldn't call") . " mdadm --detail $dev: $!\n" |
28 |
|
|
unless open(MDADM, "/sbin/mdadm --detail $dev|"); |
29 |
|
|
|
30 |
|
|
while ( <MDADM> ) |
31 |
|
|
@@ -226,7 +226,7 @@ |
32 |
|
|
|
33 |
|
|
sub get_partitions |
34 |
|
|
{ |
35 |
|
|
- die "Couldn't read /proc/partitions: $!\n" |
36 |
|
|
+ die gettext("Couldn't read") . " /proc/partitions: $!\n" |
37 |
|
|
unless open (PARTITIONS, "/proc/partitions"); |
38 |
|
|
|
39 |
|
|
my %parts; |
40 |
|
|
diff -Nur -x '*.orig' -x '*.rej' e-smith-base-4.18.0/root/usr/lib/perl5/site_perl/esmith/console/configure.pm mezzanine_patched_e-smith-base-4.18.0/root/usr/lib/perl5/site_perl/esmith/console/configure.pm |
41 |
|
|
--- e-smith-base-4.18.0/root/usr/lib/perl5/site_perl/esmith/console/configure.pm 2008-03-08 20:42:00.000000000 +1100 |
42 |
|
|
+++ mezzanine_patched_e-smith-base-4.18.0/root/usr/lib/perl5/site_perl/esmith/console/configure.pm 2008-03-08 20:41:12.000000000 +1100 |
43 |
|
|
@@ -891,7 +891,7 @@ |
44 |
|
|
"3.", "www.dyndns.com" . " - " . gettext("commercial service"), |
45 |
|
|
"4.", "www.dyndns.org" . " - " . gettext("free service"), |
46 |
|
|
"5.", "www.tzo.com" . " - " . gettext("commercial service"), |
47 |
|
|
- "6.", "custom", |
48 |
|
|
+ "6.", "custom", . " - " . gettext("alternate DynDNS service"), |
49 |
|
|
); |
50 |
|
|
|
51 |
|
|
($rc, $choice) = $console->menu_page |