no-getopt stuff

[gitmo/MooseX-Getopt.git] / lib / MooseX / Getopt / Strict.pm

diff --git a/lib/MooseX/Getopt/Strict.pm b/lib/MooseX/Getopt/Strict.pm
index d5cb38a..990f6a8 100644 (file)
--- a/lib/MooseX/Getopt/Strict.pm
+++ b/lib/MooseX/Getopt/Strict.pm
@@ -1,14 +1,14 @@
-#!/usr/bin/perl
 
 package MooseX::Getopt::Strict;
 use Moose::Role;
 
-with qw/MooseX::Getopt/;
+with 'MooseX::Getopt';
 
 sub _compute_getopt_attrs {
     my ( $class, @args ) = @_;
-
-    grep { $_->isa("MooseX::Getopt::Meta::Attribute") } $class->MooseX::Getopt::_compute_getopt_attrs(@args);
+    grep { 
+        $_->isa("MooseX::Getopt::Meta::Attribute") 
+    } $class->MooseX::Getopt::_compute_getopt_attrs(@args);
 }
 
 __PACKAGE__;