The test needs to be on defined $ENV{PERL_UNICODE} because during
authorNicholas Clark <nick@ccl4.org>
Thu, 20 Dec 2007 18:48:09 +0000 (18:48 +0000)
committerNicholas Clark <nick@ccl4.org>
Thu, 20 Dec 2007 18:48:09 +0000 (18:48 +0000)
testing being set to an empty string has meaning.

p4raw-id: //depot/perl@32674

lib/Test/Harness/t/unicode.t

index b5b767e..3a600b6 100644 (file)
@@ -13,7 +13,7 @@ BEGIN {
       unless $] > 5.008;
 
     plan skip_all => "PERL_UNICODE set"
-      if $ENV{PERL_UNICODE};
+      if defined $ENV{PERL_UNICODE};
 
     eval "use File::Temp";
     plan skip_all => "File::Temp unavailable"