X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=ext%2FDigest%2FMD5%2Ft%2Falign.t;h=e9660f39146936f0eaef08b3a218aa4f0141eeb5;hb=9a03235d71a6ebc5a1eb9cdd3a23e531d8645e9c;hp=417606241511622de316af4863d9bf06e17fd57a;hpb=581883cdf264875c9c1f1fd2c8d45ef942f553c1;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/ext/Digest/MD5/t/align.t b/ext/Digest/MD5/t/align.t
index 4176062..e9660f3 100644
--- a/ext/Digest/MD5/t/align.t
+++ b/ext/Digest/MD5/t/align.t
@@ -1,6 +1,8 @@
 BEGIN {
-        chdir 't' if -d 't';
-        @INC = '../lib';
+	if ($ENV{PERL_CORE}) {
+	        chdir 't' if -d 't';
+	        @INC = '../lib';
+	}
 }
 
 # Test that md5 works on unaligned memory blocks