From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Thu, 28 Jun 2018 14:53:28 +0000 (+0100)
Subject: test suite: manpages-format: work properly when no expected warnings
X-Git-Tag: archive/debian/5.6~3
X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?p=dgit.git;a=commitdiff_plain;h=0e41808f2b25117c153c55d3913d85ce21b735fd

test suite: manpages-format: work properly when no expected warnings

Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>
---

diff --git a/tests/tests/manpages-format b/tests/tests/manpages-format
index c905445b..79efb875 100755
--- a/tests/tests/manpages-format
+++ b/tests/tests/manpages-format
@@ -37,12 +37,14 @@ not_egrep_vxPf () {
 	perl -ne '
 		BEGIN () {
 			open PATS, shift @ARGV or die $!;
-			$re = join "|", map { chomp; qr{^(?:$_)$} } <PATS>;
+			$re = join "|", map { chomp; qr{^(?:$_)$} }
+				qr{^(?=a)b}, <PATS>;
+			print STDERR "RE $re\n";
 		}
 		next if m{$re};
 		print STDERR "unexpected: $_";
 		$bad = 1;
-		END { die "unexpected, re= $re\n" if $bad; }
+		END { die "unexpected errors\n" if $bad; }
 	' "$@"
 }