Carp: Fix .t failure to compile in v5.6
authorKarl Williamson <khw@cpan.org>
Thu, 17 Mar 2016 22:45:47 +0000 (16:45 -0600)
committerKarl Williamson <khw@cpan.org>
Fri, 18 Mar 2016 03:31:02 +0000 (21:31 -0600)
This doesn't guarantee the tests pass in that release; just that it will
actually get to testing.

dist/Carp/Changes
dist/Carp/t/arg_string.t

index b90b395..dca6a52 100644 (file)
@@ -1,5 +1,6 @@
 
-version 1.39_01; 2016-03-10
+version 1.40; 2016-03-10
+  * Get arg_string.t to compile in perl v5.6
   * Add information for how to contribute to Carp.
 
 version 1.39; 2016-03-06
index 42b43b1..dbd2e6e 100644 (file)
@@ -15,7 +15,7 @@ my $e9 = sprintf "%02x", (($] ge 5.007_003)
                           : ((ord("A") == 193)
                              ? 0x51
                              : 0xE9));
-my $chr_e9 = chr utf8::unicode_to_native(0xe9);
+my $chr_e9 = chr eval "0x$e9";
 my $nl_as_hex = sprintf "%x", ord("\n");
 
 like lm(3), qr/main::lm\(3\)/;