diff options
author | Brian Fraser <fraserbn@gmail.com> | 2012-04-20 22:09:56 -0300 |
---|---|---|
committer | Karl Williamson <public@khwilliamson.com> | 2012-04-26 11:58:56 -0600 |
commit | dd53ca2f01b45dd5a54bd2d00709dbfbe00ccdf3 (patch) | |
tree | e2fd5354744dbcf5e553df4cd7dbbc71159baaea /t/uni | |
parent | 906024c7fead4086ed911b8052d784aa07c2f1e2 (diff) | |
download | perl-dd53ca2f01b45dd5a54bd2d00709dbfbe00ccdf3.tar.gz |
Make unicode label tests use unicode_eval.
A recent change exposed a faulty test, in t/uni/labels.t;
Previously, a downgraded label passed to eval under 'use utf8;'
would've been erroneously considered UTF-8 and the tests
would pass. Now it's correctly reported as illegal UTF-8
unless unicode_eval is in effect.
Diffstat (limited to 't/uni')
-rw-r--r-- | t/uni/labels.t | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/t/uni/labels.t b/t/uni/labels.t index 1e4d6840d1..3d7d476ae9 100644 --- a/t/uni/labels.t +++ b/t/uni/labels.t @@ -62,6 +62,7 @@ LÁBEL: { utf8::downgrade($prog); } if ($d--) { + use feature 'unicode_eval'; no warnings 'exiting'; eval $prog; } |