Testsuite: Make patchexim work with dirty tag checkouts

diff --git a/test/patchexim b/test/patchexim
index 9659ba133cecd443e3ef5ac101d7dc544c3f5979..7bd84d49d2bf5c82a9aaed7b5aada4f40825c04e 100755 (executable)
--- a/test/patchexim
+++ b/test/patchexim
@@ -19,7 +19,7 @@ open(OUT, '>eximdir/exim') || die "** Failed to open eximdir/exim: $!\n";
 while(<IN>)
   {
   s/>>>running<<</<<<testing>>>/;
-  s/(\d+\.\d+(?:[_.]\d+)?([_-]RC\d+|[_-]dev)?(?:[0-9a-fA-F-]*)(?:-XX)?\0<<eximversion>>)/"x.yz\0" . ("*" x (length($1) - 5))/e;
+  s/(\d+\.\d+(?:[_.]\d+)?([_-]RC\d+|[_-]dev)?(?:[0-9a-fA-F-]*)(?:[-_]XX)?\0<<eximversion>>)/"x.yz\0" . ("*" x (length($1) - 5))/e;
   print OUT;
   }