e-smith-backup/sme9/e-smith-backup-2.4.0-disableConsoleRestore.patch

diff -ruN e-smith-backup-2.4.0.p31/root/usr/share/perl5/vendor_perl/esmith/console/perform_restore.pm e-smith-backup-2.4.0/root/usr/share/perl5/vendor_perl/esmith/console/perform_restore.pm
--- e-smith-backup-2.4.0.p31/root/usr/share/perl5/vendor_perl/esmith/console/perform_restore.pm 2014-03-22 16:13:12.000000000 -0700
+++ e-smith-backup-2.4.0/root/usr/share/perl5/vendor_perl/esmith/console/perform_restore.pm     2014-03-22 16:20:10.000000000 -0700
@@ -34,6 +34,11 @@
     {
         return if ($db->get_value('PasswordSet') eq 'yes'); # too late
     }
+    else
+    {
+        # For SME 9 disable the restore from console
+        return unless ($db->get_value('AllowConsoleRestore') eq 'enabled');
+    }
     return if ($db->get_prop('bootstrap-console', 'Restore') eq 'disabled');
     my ($rc, $choice) = $console->yesno_page
         (
1	wellsi	1.1	diff -ruN e-smith-backup-2.4.0.p31/root/usr/share/perl5/vendor_perl/esmith/console/perform_restore.pm e-smith-backup-2.4.0/root/usr/share/perl5/vendor_perl/esmith/console/perform_restore.pm
2			--- e-smith-backup-2.4.0.p31/root/usr/share/perl5/vendor_perl/esmith/console/perform_restore.pm 2014-03-22 16:13:12.000000000 -0700
3			+++ e-smith-backup-2.4.0/root/usr/share/perl5/vendor_perl/esmith/console/perform_restore.pm 2014-03-22 16:20:10.000000000 -0700
4			@@ -34,6 +34,11 @@
5			{
6			return if ($db->get_value('PasswordSet') eq 'yes'); # too late
7			}
8			+ else
9			+ {
10			+ # For SME 9 disable the restore from console
11			+ return unless ($db->get_value('AllowConsoleRestore') eq 'enabled');
12			+ }
13			return if ($db->get_prop('bootstrap-console', 'Restore') eq 'disabled');
14			my ($rc, $choice) = $console->yesno_page
15			(