Skip to content

Commit c74a57b

Browse files
committed
CPAN-Meta-YAML: don't depend on the old :utf8 bugginess
1 parent 1dede87 commit c74a57b

File tree

1 file changed

+4
-1
lines changed

1 file changed

+4
-1
lines changed

cpan/CPAN-Meta-YAML/t/11_read_string.t

+4-1
Original file line numberDiff line numberDiff line change
@@ -40,7 +40,10 @@ subtest 'invalid UTF-8' => sub {
4040
# get invalid UTF-8 by reading Latin-1 with lax :utf8 layer
4141
my $string = do {
4242
local $SIG{__WARN__} = sub {};
43-
slurp( test_data_file('latin1.yml'), ":utf8" );
43+
my $ret = slurp( test_data_file('latin1.yml'), ":raw" );
44+
require Encode;
45+
Encode::_utf8_on($ret);
46+
$ret;
4447
};
4548
my $obj = eval { CPAN::Meta::YAML->read_string($string); };
4649
is( $obj, undef, "read_string should return undef" );

0 commit comments

Comments
 (0)