With $PERL_UNICODE we still need to find utf8.pm

diff --git a/t/porting/diag.t b/t/porting/diag.t
index 0241a12..65e1958 100644 (file)
--- a/t/porting/diag.t
+++ b/t/porting/diag.t
@@ -11,6 +11,7 @@ $|=1;
 my $make_exceptions_list = ($ARGV[0]||'') eq '--make-exceptions-list';
 
 chdir '..' or die "Can't chdir ..: $!";
+BEGIN { defined $ENV{PERL_UNICODE} and push @INC, "lib"; }
 
 open my $diagfh, "<", "pod/perldiag.pod"
   or die "Can't open pod/perldiag.pod: $!";