From: Vincent Pit <perl@profvince.com>
Date: Tue, 1 Sep 2009 10:57:30 +0000 (+0200)
Subject: Don't use the anonymous hash reference constructor in t/TEST
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=9b37184d5f44b099dc8920e1772471c589138a9b;p=p5sagit%2Fp5-mst-13.2.git

Don't use the anonymous hash reference constructor in t/TEST
---

diff --git a/t/TEST b/t/TEST
index f004f9b..6fb6201 100755
--- a/t/TEST
+++ b/t/TEST
@@ -191,7 +191,7 @@ sub _scan_test {
 
     my $utf8 = $::with_utf8 ? '-I$lib -Mutf8' : '';
 
-    return {
+    my %options = (
 	perl => $perl,
 	lib => $lib,
 	test => $test,
@@ -201,7 +201,9 @@ sub _scan_test {
 	utf8 => $utf8,
 	file => $file_opts,
 	switch => $switch,
-    };
+    );
+
+    return \%options;
 }
 
 sub _cmd {