linenumber tweak
Jarkko Hietaniemi [Wed, 28 Jun 2000 15:54:30 +0000 (15:54 +0000)]
p4raw-id: //depot/cfgperl@6258

t/pragma/warn/regcomp

index cd2e5c2..768b792 100644 (file)
@@ -54,7 +54,7 @@ no warnings 'regexp' ;
 $a =~ /a$x/ ;
 $b =~ /b$y/ ;
 EXPECT
-/a\m/: Unrecognized escape \m passed through at - line 4.
+/a\m/: Unrecognized escape \m passed through at - line 5.
 ########
 # regcomp.c [S_regpposixcc S_checkposixcc]
 BEGIN { $ENV{PERL_DESTRUCT_LEVEL} = 0 unless $ENV{PERL_DESTRUCT_LEVEL} > 3 }