--- rpms/smeserver-fail2ban/contribs10/smeserver-fail2ban-0.1.18-bz12008-backup.patch	2022/07/30 03:04:39	1.1
+++ rpms/smeserver-fail2ban/contribs10/smeserver-fail2ban-0.1.18-bz12008-backup.patch	2022/07/30 03:27:03	1.2
@@ -13,37 +13,15 @@ diff -Nur --no-dereference smeserver-fai
 diff -Nur --no-dereference smeserver-fail2ban-0.1.18.old/root/etc/e-smith/templates/etc/backup-data.d/smeserver-fail2ban.include/template-begin smeserver-fail2ban-0.1.18/root/etc/e-smith/templates/etc/backup-data.d/smeserver-fail2ban.include/template-begin
 --- smeserver-fail2ban-0.1.18.old/root/etc/e-smith/templates/etc/backup-data.d/smeserver-fail2ban.include/template-begin	1969-12-31 19:00:00.000000000 -0500
 +++ smeserver-fail2ban-0.1.18/root/etc/e-smith/templates/etc/backup-data.d/smeserver-fail2ban.include/template-begin	2022-07-29 22:59:07.986000000 -0400
-@@ -0,0 +1,20 @@
-+#Only non rpm owned files are backupe there
-+{
-+use RPM2;
-+my $rpm_db = RPM2->open_rpm_db();
-+
-+my @dirs = qw(/etc/fail2ban/action.d
-+/etc/fail2ban/fail2ban.d
-+/etc/fail2ban/filter.d
-+/etc/fail2ban/jail.d
-+);
-+
-+foreach  my $some_dir  (@dirs)  {
-+  opendir(my $dh, $some_dir) || die "Can't open $some_dir: $!";
-+  while ( (my $file = readdir $dh) ) {
-+    next if $file =~ /^\.{1,2}$/;
-+    $OUT .= "$some_dir/$file\n" unless $rpm_db->find_by_file("$some_dir/$file");
-+  }
-+  closedir $dh;
-+}
-+}
-diff -Nur --no-dereference smeserver-fail2ban-0.1.18.old/root/etc/e-smith/templates/etc/dar/DailyBackup.dcf/41go-into-smeserver-fail2ban smeserver-fail2ban-0.1.18/root/etc/e-smith/templates/etc/dar/DailyBackup.dcf/41go-into-smeserver-fail2ban
---- smeserver-fail2ban-0.1.18.old/root/etc/e-smith/templates/etc/dar/DailyBackup.dcf/41go-into-smeserver-fail2ban	1969-12-31 19:00:00.000000000 -0500
-+++ smeserver-fail2ban-0.1.18/root/etc/e-smith/templates/etc/dar/DailyBackup.dcf/41go-into-smeserver-fail2ban	2022-07-29 23:02:58.224000000 -0400
 @@ -0,0 +1,22 @@
 +#Only non rpm owned files are backupe there
 +{
 +use RPM2;
 +my $rpm_db = RPM2->open_rpm_db();
 +
-+my @dirs = qw(/etc/fail2ban/action.d
++my @dirs = qw(
++/etc/fail2ban
++/etc/fail2ban/action.d
 +/etc/fail2ban/fail2ban.d
 +/etc/fail2ban/filter.d
 +/etc/fail2ban/jail.d
@@ -53,10 +31,8 @@ diff -Nur --no-dereference smeserver-fai
 +  opendir(my $dh, $some_dir) || die "Can't open $some_dir: $!";
 +  while ( (my $file = readdir $dh) ) {
 +    next if $file =~ /^\.{1,2}$/;
-+    my $backdir = $some_dir =~ s/^\///;
-+    $OUT .= "--go-into $backdir/$file\n" unless $rpm_db->find_by_file("$some_dir/$file");
++    $OUT .= "$some_dir/$file\n" unless $rpm_db->find_by_file("$some_dir/$file");
 +  }
 +  closedir $dh;
 +}
 +}
-+