summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorFather Chrysostomos <sprout@cpan.org>2011-11-26 15:47:43 -0800
committerFather Chrysostomos <sprout@cpan.org>2012-03-25 14:25:46 -0700
commitf232b41c679f24b875f6f23a4abe659b0c946942 (patch)
treec4a4ee97a8d89c9012e175d7988b240095ee42ea
parent5db1eb8d3ecc607380cd43267d08149b82822fe9 (diff)
downloadperl-f232b41c679f24b875f6f23a4abe659b0c946942.tar.gz
Fix test failure
This fixes up tests added in the previous commit, making them take evalbytes into account. Those tests were originally written in a branch where evalbytes didn’t exist and the unicode_eval feature was implicitly enabled.
-rw-r--r--t/uni/labels.t4
1 files changed, 2 insertions, 2 deletions
diff --git a/t/uni/labels.t b/t/uni/labels.t
index 8cb1ac4bde..e3ff938174 100644
--- a/t/uni/labels.t
+++ b/t/uni/labels.t
@@ -11,7 +11,7 @@ BEGIN {
use utf8;
use open qw( :utf8 :std );
use warnings;
-use feature 'unicode_strings';
+use feature qw 'unicode_strings evalbytes';
use charnames qw( :full );
@@ -36,7 +36,7 @@ SKIP: {
LOOP: {
Encode::_utf8_off($prog);
- eval $prog;
+ evalbytes $prog;
like $@, qr/^Unrecognized character/, "..but turn off the UTF-8 flag and it explodes";
}
}