From 66775e20271e899d77307ed188b427c120d5f544 Mon Sep 17 00:00:00 2001
From: Nick Clemens <nick@bywatersolutions.com>
Date: Mon, 20 Sep 2021 17:22:46 +0000
Subject: [PATCH] Bug 28832: (follow-up) Handle regex fields too

Signed-off-by: Andrew Fuerste-Henry <andrew@bywatersolutions.com>
Signed-off-by: Martin Renvoize <martin.renvoize@ptfs-europe.com>
---
 tools/batchMod.pl | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/tools/batchMod.pl b/tools/batchMod.pl
index de0af2d63b..e21b0e8299 100755
--- a/tools/batchMod.pl
+++ b/tools/batchMod.pl
@@ -123,10 +123,13 @@ if ($op eq "action") {
 
     # Clear the fields we are not editing, leave fields we are blanking
     foreach( my $i = 0; $i < scalar @values; $i++ ){
-        unless( $values[$i] || grep { $subfields[$i] } @disabled ){
+        unless( $values[$i] || $searches[$i] || grep { $subfields[$i] } @disabled ){
             splice(@values,$i,1);
             splice(@subfields,$i,1);
             splice(@tags,$i,1);
+            splice(@searches,$i,1);
+            splice(@replaces,$i,1);
+            splice(@modifiers,$i,1);
         }
     }
 
-- 
2.20.1