e-smith-base/sme7/e-smith-base-4.18.0-gettextErrors.patch

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
--- e-smith-base-4.18.0/root/sbin/e-smith/console-menu-items/manageRAID.pl      2008-02-17 11:01:13.000000000 +1100
+++ mezzanine_patched_e-smith-base-4.18.0/root/sbin/e-smith/console-menu-items/manageRAID.pl    2008-02-17 11:00:02.000000000 +1100
@@ -150,7 +150,7 @@
     my $cmd_out = qx( @cmd 2>&1 );
     unless ($? == 0)
     {
-        $text = gettext("The command @cmd failed:") .
+        $text = gettext("The command failed:") . " @cmd" .
                 "\n\n" . $cmd_out . "\n\n" .
                 gettext("This configuration is not yet fully supported in these screens.");
 
diff -Nur -x '*.orig' -x '*.rej' e-smith-base-4.18.0/root/usr/lib/perl5/site_perl/esmith/console/perform_restore.pm mezzanine_patched_e-smith-base-4.18.0/root/usr/lib/perl5/site_perl/esmith/console/perform_restore.pm
--- e-smith-base-4.18.0/root/usr/lib/perl5/site_perl/esmith/console/perform_restore.pm  2008-02-17 11:01:13.000000000 +1100
+++ mezzanine_patched_e-smith-base-4.18.0/root/usr/lib/perl5/site_perl/esmith/console/perform_restore.pm        2008-02-17 10:59:32.000000000 +1100
@@ -105,7 +105,8 @@
         (
          title => gettext("Start restore from backup"),
          text  =>
-         gettext("Backup file $device/smeserver.tgz (size $size bytes) found") .
+         gettext("Backup file found:") . " $device/smeserver.tgz " .
+         gettext("size") . " $size " . gettext("bytes") .
          "\n\n" .
          gettext("Do you wish to restore from this file?"),
         );
diff -Nur -x '*.orig' -x '*.rej' e-smith-base-4.18.0/root/usr/lib/perl5/site_perl/esmith/console/system_password.pm mezzanine_patched_e-smith-base-4.18.0/root/usr/lib/perl5/site_perl/esmith/console/system_password.pm
--- e-smith-base-4.18.0/root/usr/lib/perl5/site_perl/esmith/console/system_password.pm  2008-02-17 11:01:14.000000000 +1100
+++ mezzanine_patched_e-smith-base-4.18.0/root/usr/lib/perl5/site_perl/esmith/console/system_password.pm        2008-02-17 03:15:18.000000000 +1100
@@ -95,8 +95,8 @@
             (
              title => gettext("Bad Password Choice"),
              text  =>
-             gettext("The password you have chosen is not a good choice, because") .
-             gettext( " $reason" ) . "." .
+             gettext("The password you have chosen is not a good choice, because ") .
+             gettext($reason) . "." .
              "\n\n" .
              gettext("Do you wish to choose a better one?"),
             );
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-02-17 11:01:13.000000000 +1100
3			+++ mezzanine_patched_e-smith-base-4.18.0/root/sbin/e-smith/console-menu-items/manageRAID.pl 2008-02-17 11:00:02.000000000 +1100
4			@@ -150,7 +150,7 @@
5			my $cmd_out = qx( @cmd 2>&1 );
6			unless ($? == 0)
7			{
8			- $text = gettext("The command @cmd failed:") .
9			+ $text = gettext("The command failed:") . " @cmd" .
10			"\n\n" . $cmd_out . "\n\n" .
11			gettext("This configuration is not yet fully supported in these screens.");
12
13			diff -Nur -x '.orig' -x '.rej' e-smith-base-4.18.0/root/usr/lib/perl5/site_perl/esmith/console/perform_restore.pm mezzanine_patched_e-smith-base-4.18.0/root/usr/lib/perl5/site_perl/esmith/console/perform_restore.pm
14			--- e-smith-base-4.18.0/root/usr/lib/perl5/site_perl/esmith/console/perform_restore.pm 2008-02-17 11:01:13.000000000 +1100
15			+++ mezzanine_patched_e-smith-base-4.18.0/root/usr/lib/perl5/site_perl/esmith/console/perform_restore.pm 2008-02-17 10:59:32.000000000 +1100
16			@@ -105,7 +105,8 @@
17			(
18			title => gettext("Start restore from backup"),
19			text =>
20			- gettext("Backup file $device/smeserver.tgz (size $size bytes) found") .
21			+ gettext("Backup file found:") . " $device/smeserver.tgz " .
22			+ gettext("size") . " $size " . gettext("bytes") .
23			"\n\n" .
24			gettext("Do you wish to restore from this file?"),
25			);
26			diff -Nur -x '.orig' -x '.rej' e-smith-base-4.18.0/root/usr/lib/perl5/site_perl/esmith/console/system_password.pm mezzanine_patched_e-smith-base-4.18.0/root/usr/lib/perl5/site_perl/esmith/console/system_password.pm
27			--- e-smith-base-4.18.0/root/usr/lib/perl5/site_perl/esmith/console/system_password.pm 2008-02-17 11:01:14.000000000 +1100
28			+++ mezzanine_patched_e-smith-base-4.18.0/root/usr/lib/perl5/site_perl/esmith/console/system_password.pm 2008-02-17 03:15:18.000000000 +1100
29			@@ -95,8 +95,8 @@
30			(
31			title => gettext("Bad Password Choice"),
32			text =>
33			- gettext("The password you have chosen is not a good choice, because") .
34			- gettext( " $reason" ) . "." .
35			+ gettext("The password you have chosen is not a good choice, because ") .
36			+ gettext($reason) . "." .
37			"\n\n" .
38			gettext("Do you wish to choose a better one?"),
39			);