Make unicode label tests use unicode_eval.
authorBrian Fraser <fraserbn@gmail.com>
Sat, 21 Apr 2012 01:09:56 +0000 (22:09 -0300)
committerKarl Williamson <public@khwilliamson.com>
Thu, 26 Apr 2012 17:58:56 +0000 (11:58 -0600)
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.

t/uni/labels.t

index 1e4d684..3d7d476 100644 (file)
@@ -62,6 +62,7 @@ LÁBEL: {
         utf8::downgrade($prog);
     }
     if ($d--) {
+        use feature 'unicode_eval';
         no warnings 'exiting';
         eval $prog;
     }