[libclass-tiny-perl] 11/22: tidy

[gregor herrmann]

This is an automated email from the git hooks/post-receive script.

gregoa pushed a commit to annotated tag release-0.001
in repository libclass-tiny-perl.

commit 2978604e8ff46e69798c3afea723110094a37aa3
Author: David Golden <dagolden at cpan.org>
Date:   Fri Aug 16 07:15:21 2013 -0400

    tidy
---
 t/lib/Alfa.pm    | 1 +
 t/lib/Baker.pm   | 1 +
 t/lib/Charlie.pm | 5 +++--
 3 files changed, 5 insertions(+), 2 deletions(-)

diff --git a/t/lib/Alfa.pm b/t/lib/Alfa.pm
index b4f8dc8..e809ae2 100644
--- a/t/lib/Alfa.pm
+++ b/t/lib/Alfa.pm
@@ -1,6 +1,7 @@
 use 5.008001;
 use strict;
 use warnings;
+
 package Alfa;
 
 use Class::Tiny qw/foo bar/;
diff --git a/t/lib/Baker.pm b/t/lib/Baker.pm
index 0274321..db18bbe 100644
--- a/t/lib/Baker.pm
+++ b/t/lib/Baker.pm
@@ -1,6 +1,7 @@
 use 5.008001;
 use strict;
 use warnings;
+
 package Baker;
 use base 'Alfa';
 
diff --git a/t/lib/Charlie.pm b/t/lib/Charlie.pm
index 9144eaa..0c3289e 100644
--- a/t/lib/Charlie.pm
+++ b/t/lib/Charlie.pm
@@ -1,6 +1,7 @@
 use 5.008001;
 use strict;
 use warnings;
+
 package Charlie;
 
 use subs qw/bar/;
@@ -9,8 +10,8 @@ use Class::Tiny qw/foo bar/;
 
 sub bar {
     my $self = shift;
-    if ( @_ ) {
-        $self->{bar} = [ @_ ];
+    if (@_) {
+        $self->{bar} = [@_];
     }
     return $self->{bar};
 }

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libclass-tiny-perl.git