1 |
diff -Nur -x '*.orig' -x '*.rej' e-smith-base-4.18.0/root/usr/lib/perl5/site_perl/esmith/console/perform_backup.pm mezzanine_patched_e-smith-base-4.18.0/root/usr/lib/perl5/site_perl/esmith/console/perform_backup.pm |
2 |
--- e-smith-base-4.18.0/root/usr/lib/perl5/site_perl/esmith/console/perform_backup.pm 2007-02-23 08:38:14.000000000 -0700 |
3 |
+++ mezzanine_patched_e-smith-base-4.18.0/root/usr/lib/perl5/site_perl/esmith/console/perform_backup.pm 2007-02-23 08:37:51.000000000 -0700 |
4 |
@@ -71,7 +71,7 @@ |
5 |
{ |
6 |
next unless m:^(\S+)\s+(/media/\S+)\s+(\S+)\s+(\S+):; |
7 |
my ($dev, $mount, $filesys, $options) = ($1, $2, $3, $4); |
8 |
- push @dirs, $mount if ($options =~ /rw/); |
9 |
+ push @dirs, $mount unless $mount =~ m{/floppy|/cd|/dvd}; |
10 |
} |
11 |
close FSTAB; |
12 |
unless ($dirs[0]) |
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 2007-02-23 08:38:14.000000000 -0700 |
15 |
+++ mezzanine_patched_e-smith-base-4.18.0/root/usr/lib/perl5/site_perl/esmith/console/perform_restore.pm 2007-02-23 08:37:18.000000000 -0700 |
16 |
@@ -42,7 +42,7 @@ |
17 |
{ |
18 |
next unless m:^(\S+)\s+(/media/\S+)\s+(\S+)\s+(\S+):; |
19 |
my ($dev, $mount, $filesys, $options) = ($1, $2, $3, $4); |
20 |
- push @dirs, $mount if ($options =~ /rw/); |
21 |
+ push @dirs, $mount unless $mount =~ m{/floppy|/cd|/dvd}; |
22 |
} |
23 |
close FSTAB; |
24 |
unless ($dirs[0]) |