e-smith-base/sme8/e-smith-backup-5.2.0.bz9097.Test_Backup_MountPoint.patch

diff -Nur e-smith-backup-2.4.0.bz9089.old/root/usr/share/perl5/vendor_perl/esmith/console/perform_backup.pm e-smith-backup-2.4.0.bz9089.new/root/usr/share/perl5/vendor_perl/esmith/console/perform_backup.pm
--- e-smith-backup-2.4.0.bz9089.old/root/usr/lib/perl5/site_perl/esmith/console/perform_backup.pm       2015-10-10 09:10:50.150741515 +0200
+++ e-smith-backup-2.4.0.bz9089.new/root/usr/lib/perl5/site_perl/esmith/console/perform_backup.pm       2015-10-10 09:12:18.621135152 +0200
@@ -207,7 +207,17 @@
         my %args_hash = ( @args );
         $device = $args_hash{$choice};
     }
-    system("/bin/mount", "$device", "/mnt/bootstrap-console-backup");
+    unless  ( system("/bin/mount", "$device", "/mnt/bootstrap-console-backup") == '0' )
+    {
+    ($rc, $choice) = $console->message_page
+        (
+         title   => gettext("No mountable backup medium"),
+         right => gettext("Back"),
+         text =>
+         gettext("Unable to mount removable media, please check the file system format (default : Vfat,Ext2,Ext3,Ext4)"),
+       );
+    goto INITIATE_BACKUP;
+    }
 
     use File::stat;
     my $st = stat("/mnt/bootstrap-console-backup/smeserver.tgz");
1	diff -Nur e-smith-backup-2.4.0.bz9089.old/root/usr/share/perl5/vendor_perl/esmith/console/perform_backup.pm e-smith-backup-2.4.0.bz9089.new/root/usr/share/perl5/vendor_perl/esmith/console/perform_backup.pm
2	--- e-smith-backup-2.4.0.bz9089.old/root/usr/lib/perl5/site_perl/esmith/console/perform_backup.pm 2015-10-10 09:10:50.150741515 +0200
3	+++ e-smith-backup-2.4.0.bz9089.new/root/usr/lib/perl5/site_perl/esmith/console/perform_backup.pm 2015-10-10 09:12:18.621135152 +0200
4	@@ -207,7 +207,17 @@
5	my %args_hash = ( @args );
6	$device = $args_hash{$choice};
7	}
8	- system("/bin/mount", "$device", "/mnt/bootstrap-console-backup");
9	+ unless ( system("/bin/mount", "$device", "/mnt/bootstrap-console-backup") == '0' )
10	+ {
11	+ ($rc, $choice) = $console->message_page
12	+ (
13	+ title => gettext("No mountable backup medium"),
14	+ right => gettext("Back"),
15	+ text =>
16	+ gettext("Unable to mount removable media, please check the file system format (default : Vfat,Ext2,Ext3,Ext4)"),
17	+ );
18	+ goto INITIATE_BACKUP;
19	+ }
20
21	use File::stat;
22	my $st = stat("/mnt/bootstrap-console-backup/smeserver.tgz");