From: Father Chrysostomos <sprout@cpan.org>
Date: Sat, 22 Sep 2012 05:44:00 +0000 (-0700)
Subject: Let qr.t run from the top level
X-Git-Tag: upstream/5.20.0~5342
X-Git-Url: http://review.tizen.org/git/?a=commitdiff_plain;h=ab1d075370c212c5b4ea765c3a48fac555cd1f27;p=platform%2Fupstream%2Fperl.git

Let qr.t run from the top level
---

diff --git a/t/op/qr.t b/t/op/qr.t
index cc42db0..83bb3d9 100644
--- a/t/op/qr.t
+++ b/t/op/qr.t
@@ -2,7 +2,10 @@
 
 use strict;
 
-BEGIN { require './test.pl'; }
+BEGIN {
+    chdir 't';
+    require './test.pl';
+}
 
 plan(tests => 18);