[svn:parrot] r39903 - branches/darwinhints/lib/Parrot/Configure/Options/Test

jkeenan at svn.parrot.org jkeenan at svn.parrot.org
Tue Jul 7 02:06:03 UTC 2009


Author: jkeenan
Date: Tue Jul  7 02:06:00 2009
New Revision: 39903
URL: https://trac.parrot.org/parrot/changeset/39903

Log:
Make one internal variable's name more self-documenting.

Modified:
   branches/darwinhints/lib/Parrot/Configure/Options/Test/Prepare.pm

Modified: branches/darwinhints/lib/Parrot/Configure/Options/Test/Prepare.pm
==============================================================================
--- branches/darwinhints/lib/Parrot/Configure/Options/Test/Prepare.pm	Tue Jul  7 01:40:12 2009	(r39902)
+++ branches/darwinhints/lib/Parrot/Configure/Options/Test/Prepare.pm	Tue Jul  7 02:06:00 2009	(r39903)
@@ -77,11 +77,11 @@
     my %steps_tests = %{ $steps_tests_ref };
     my @steps_tests;
     foreach my $step ( @{ $steps_expected_ref } ) {
-        my @temp = split /::/, $step;
-        my $these_tests = $steps_tests{$temp[0]}{$temp[1]}
+        my @module_path = split /::/, $step;
+        my $these_tests = $steps_tests{$module_path[0]}{$module_path[1]}
             or carp "No tests exist for configure step $step";
         foreach my $k (sort keys %$these_tests) {
-            push @steps_tests, qq{$steps_dir/$temp[0]_$temp[1]-$k.t};
+            push @steps_tests, qq{$steps_dir/$module_path[0]_$module_path[1]-$k.t};
         }
     }
     return @steps_tests;


More information about the parrot-commits mailing list