Commits

pa...@9ae0c189-cd1f-4510-a509-f4891f5cf20d  committed aa5d95a

fix #33810

  • Participants
  • Parent commits d6742da

Comments (0)

Files changed (1)

   for my $enc (qw(UTF-16 UTF-16LE UTF-16BE)) {
     print "------------------\n";
     print $enc,"\n";
-    my $xml = Encode::encode('UTF-16LE',qq{<?xml version="1.0" encoding="$enc"?>
+    my $xml = Encode::encode($enc,qq{<?xml version="1.0" encoding="$enc"?>
 <test foo="bar"/>
 });
     my $dom = XML::LibXML->new->parse_string($xml);