1 |
stephdl |
1.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"); |