In perl.git, the branch blead has been updated

<http://perl5.git.perl.org/perl.git/commitdiff/97e57bec1f0ba4f0c3b1dc18ee146632010e3373?hp=d37c508e84cbea4f7db8d987d077d9d490bfd4fa>

- Log -----------------------------------------------------------------
commit 97e57bec1f0ba4f0c3b1dc18ee146632010e3373
Author: Karl Williamson <[email protected]>
Date:   Sat Jul 15 19:36:25 2017 -0600

    t/lib/warnings/utf8: Fix test
    
    There is some randomness to this test added to fix [perl #131646].
    Change what passes to be a pattern that matches the correct template
-----------------------------------------------------------------------

Summary of changes:
 t/lib/warnings/utf8 | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/t/lib/warnings/utf8 b/t/lib/warnings/utf8
index 906630898f..dfc58c12db 100644
--- a/t/lib/warnings/utf8
+++ b/t/lib/warnings/utf8
@@ -781,4 +781,5 @@ no warnings;
 use warnings 'utf8';
 for(uc 0..t){0~~pack"UXp>",exp}
 EXPECT
-Malformed UTF-8 character: \xc2\x00 (unexpected non-continuation byte 0x00, 
immediately after start byte 0xc2; need 2 bytes, got 1)  in smart match at - 
line 9.
+OPTIONS regex
+Malformed UTF-8 character: \\x([[:xdigit:]]{2})\\x([[:xdigit:]]{2}) 
\(unexpected non-continuation byte 0x\2, immediately after start byte 0x\1; 
need 2 bytes, got 1\)  in smart match at - line 9.

--
Perl5 Master Repository

Reply via email to