t4018: convert perl pattern tests to the new infrastructure

There is one subtlety: The old test case 'perl pattern gets full line of
POD header' does not have its own new test case, but the feature is
tested nevertheless by placing the RIGHT tag at the end of the expected
hunk header in t4018/perl-skip-sub-in-pod.

Signed-off-by: Johannes Sixt <j6t@kdbg.org>
Signed-off-by: Junio C Hamano <gitster@pobox.com>
This commit is contained in:
Johannes Sixt
2014-03-21 22:07:16 +01:00
committed by Junio C Hamano
parent bfa7d01413
commit 2d08413ba1
6 changed files with 44 additions and 88 deletions

View File

@ -0,0 +1,4 @@
sub RIGHT {
my ($n) = @_;
print "ChangeMe";
}