Permalink
Browse files

Tidy

  • Loading branch information...
1 parent 2054efb commit 243aa01a48be49fdc2dca19d47d13d0cbdfbe3d2 @schwern committed Jun 30, 2009
Showing with 3 additions and 4 deletions.
  1. +1 −2 inc/MyBuild.pm
  2. +1 −1 t/control_rand.t
  3. +1 −1 t/export_sims.t
View
@@ -24,11 +24,10 @@ sub ACTION_tidy {
}
}
-
sub ACTION_critic {
my $self = shift;
- my @files = keys %{$self->find_pm_files};
+ my @files = keys %{ $self->find_pm_files };
print "Running perlcritic on @{[ scalar @files ]} files...\n";
system( "perlcritic", "-3", @files );
View
@@ -18,7 +18,7 @@ BEGIN {
use Test::Sims;
- make_rand "flower" => [ qw(Rose Daisy Ed Bob) ];
+ make_rand "flower" => [qw(Rose Daisy Ed Bob)];
::is_deeply [ rand_flower() ], ['Bob'];
::is_deeply [ rand_flower( max => 5 ) ], [ 'Ed', 'Ed' ];
View
@@ -10,7 +10,7 @@ use Test::More;
package Phone;
use Test::Sims;
- make_rand phone => [ qw(555-555-5555 212-123-4567) ];
+ make_rand phone => [qw(555-555-5555 212-123-4567)];
sub sim_phone {
return rand_phone();

0 comments on commit 243aa01

Please sign in to comment.