[libmoosex-has-sugar-perl] 04/29: Misc trailing comma / length control

[Intrigeri]

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

intrigeri pushed a commit to annotated tag 1.000000-source
in repository libmoosex-has-sugar-perl.

commit 3a963476d6d6e000e9b6457637ead6287c7b7209
Author: Kent Fredric <kentfredric at gmail.com>
Date:   Fri Jan 31 06:07:15 2014 +1300

    Misc trailing comma / length control
---
 lib/MooseX/Has/Sugar.pm           | 8 ++++----
 lib/MooseX/Has/Sugar/Minimal.pm   | 6 +++---
 lib/MooseX/Has/Sugar/Saccharin.pm | 8 ++++----
 3 files changed, 11 insertions(+), 11 deletions(-)

diff --git a/lib/MooseX/Has/Sugar.pm b/lib/MooseX/Has/Sugar.pm
index 4a3ae15..f1e2fe7 100644
--- a/lib/MooseX/Has/Sugar.pm
+++ b/lib/MooseX/Has/Sugar.pm
@@ -175,9 +175,9 @@ Sub::Exporter::setup_exporter(
     groups  => {
       isattrs => [ 'ro',       'rw',   'bare', ],
       attrs   => [ 'required', 'lazy', 'lazy_build', 'coerce', 'weak_ref', 'auto_deref', ],
-      default => [ '-attrs', '-isattrs' ],
-    }
-  }
+      default => [ '-attrs', '-isattrs', ],
+    },
+  },
 );
 
 sub import {
@@ -186,7 +186,7 @@ sub import {
       Carp::croak( qq{Trivial ro/rw with :is dropped as of 0.0300.\n} . q{ See MooseX::Has::Sugar::Minimal for those. } );
     }
     if ( $_ =~ qr/^[:-]allattrs\$/ ) {
-      Carp::carp(q{MooseX::Has::Sugar->import(:allattrs) is deprecated. just do 'use MooseX::Has::Sugar;' instead.});
+      Carp::carp( q{MooseX::Has::Sugar->import(:allattrs) is deprecated.} . q{ just do 'use MooseX::Has::Sugar;' instead.} );
       $_ =~ s/^[:-]allattrs\$/:default/;
     }
   }
diff --git a/lib/MooseX/Has/Sugar/Minimal.pm b/lib/MooseX/Has/Sugar/Minimal.pm
index 3a30459..145f3f9 100644
--- a/lib/MooseX/Has/Sugar/Minimal.pm
+++ b/lib/MooseX/Has/Sugar/Minimal.pm
@@ -48,9 +48,9 @@ Sub::Exporter::setup_exporter(
     exports => [ 'ro', 'rw', 'bare', ],
     groups  => {
       is      => [ 'ro', 'rw', 'bare', ],
-      default => ['-is'],
-    }
-  }
+      default => [ '-is', ],
+    },
+  },
 );
 
 =export_function C<bare>
diff --git a/lib/MooseX/Has/Sugar/Saccharin.pm b/lib/MooseX/Has/Sugar/Saccharin.pm
index 16c320a..d02d4c4 100644
--- a/lib/MooseX/Has/Sugar/Saccharin.pm
+++ b/lib/MooseX/Has/Sugar/Saccharin.pm
@@ -37,8 +37,8 @@ Sub::Exporter::setup_exporter(
       'ro',   'rw',      'required', 'lazy',      'lazy_build', 'coerce',  'weak_ref', 'auto_deref',
       'bare', 'default', 'init_arg', 'predicate', 'clearer',    'builder', 'trigger',
     ],
-    groups => { default => ['-all'], }
-  }
+    groups => { default => ['-all'], },
+  },
 );
 
 =export_function C<bare>
@@ -256,7 +256,7 @@ sub default(&) {
       my $self = $_[0];
       local $_ = $self;
       return $code->();
-    }
+    },
   );
 }
 
@@ -276,7 +276,7 @@ sub trigger(&) {
       my $self = $_[0];
       local $_ = $self;
       return $code->();
-    }
+    },
   );
 }
 1;

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libmoosex-has-sugar-perl.git