[svn:parrot] r36292 - trunk/t/codingstd

[fperrad at svn.parrot.org]

Author: fperrad
Date: Mon Feb  2 18:26:54 2009
New Revision: 36292
URL: https://trac.parrot.org/parrot/changeset/36292

Log:
[t] localize a variable

Modified:
   trunk/t/codingstd/filenames.t

Modified: trunk/t/codingstd/filenames.t
==============================================================================
--- trunk/t/codingstd/filenames.t	Mon Feb  2 17:09:29 2009	(r36291)
+++ trunk/t/codingstd/filenames.t	Mon Feb  2 18:26:54 2009	(r36292)
@@ -59,11 +59,12 @@
 =cut
 
 my $DIST = Parrot::Distribution->new;
-my $manifest = maniread('MANIFEST');
 my @files;
 if (@ARGV){
     @files = @ARGV;
-} else {
+}
+else {
+    my $manifest = maniread('MANIFEST');
     # Give ports a little more leeway
     @files = grep {! /^ports/} sort keys %$manifest;
 }