From: H.Merijn Brand <h.m.brand@xs4all.nl>
Date: Tue, 12 Jan 2010 07:44:14 +0000 (+0100)
Subject: With $PERL_UNICODE we still need to find utf8.pm
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=47f6eaac919f00308026ce7198c7c649288223ca;p=p5sagit%2Fp5-mst-13.2.git

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
--- 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: $!";