From: Robin Houston <robin@cpan.org>
Date: Mon, 14 May 2001 22:27:08 +0000 (+0100)
Subject: Give Deparse tester a fair chance
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=ec5f161023cc5696391a8f74e39775a6aaaa1bbb;p=p5sagit%2Fp5-mst-13.2.git

Give Deparse tester a fair chance
Message-ID: <20010514222708.A22963@penderel>

p4raw-id: //depot/perl@10110
---

diff --git a/t/TestInit.pm b/t/TestInit.pm
index 873c3ce..a932286 100644
--- a/t/TestInit.pm
+++ b/t/TestInit.pm
@@ -15,3 +15,6 @@
 
 chdir 't' if -d 't';
 @INC = '../lib';
+$0 =~ s/\.dp$//;
+1;
+