This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Fix broken lib/diagnostics.t
authorDavid Golden <dagolden@cpan.org>
Wed, 16 Feb 2011 15:49:02 +0000 (10:49 -0500)
committerDavid Golden <dagolden@cpan.org>
Wed, 16 Feb 2011 15:49:02 +0000 (10:49 -0500)
Commit 96090e4 changed a diagnostic message, but didn't update
lib/diagnostics.t

lib/diagnostics.t

index 06ab536..dae2754 100644 (file)
@@ -35,7 +35,7 @@ seek STDERR, 0,0;
 $warning = '';
 warn
  'Lexing code attempted to stuff non-Latin-1 character into Latin-1 input';
-like $warning, qr/using lex_stuff_pvn_flags or similar/, 'L<foo|bar/baz>';
+like $warning, qr/using lex_stuff_pvn or similar/, 'L<foo|bar/baz>';
 
 # Multiple messages with the same description
 seek STDERR, 0,0;