some cleanup

[gitmo/MooseX-Types-Path-Class.git] / lib / MooseX / Types / Path / Class.pm

diff --git a/lib/MooseX/Types/Path/Class.pm b/lib/MooseX/Types/Path/Class.pm
index 00d674f..e47b779 100644 (file)
--- a/lib/MooseX/Types/Path/Class.pm
+++ b/lib/MooseX/Types/Path/Class.pm
@@ -7,7 +7,7 @@ our $VERSION = '0.05';
 our $AUTHORITY = 'cpan:THEPLER';
 
 use Path::Class ();
-# TODO: export dir() and file() from Path::Class
+# TODO: export dir() and file() from Path::Class? (maybe)
 
 use MooseX::Types
     -declare => [qw( Dir File )];
@@ -33,9 +33,8 @@ for my $type ( 'Path::Class::File', File ) {
 }
 
 # optionally add Getopt option type
-use English qw(-no_match_vars);
 eval { require MooseX::Getopt; };
-if ( !$EVAL_ERROR ) {
+if ( !$@ ) {
     MooseX::Getopt::OptionTypeMap->add_option_type_to_map( $_, '=s', )
         for ( 'Path::Class::Dir', 'Path::Class::File', Dir, File, );
 }
@@ -43,6 +42,7 @@ if ( !$EVAL_ERROR ) {
 1;
 __END__
 
+
 =head1 NAME
 
 MooseX::Types::Path::Class - A Path::Class type library for Moose
@@ -86,9 +86,6 @@ L<Path::Class::File> objects.  If you have L<MooseX::Getopt> installed,
 the Getopt option type ("=s") will be added for both
 L<Path::Class::Dir> and L<Path::Class::File>.
 
-This is just meant to be a central place for these constructs, so you
-don't have to worry about whether they've been created or not, and
-you're not tempted to copy them into yet another class (like I was).
 
 =head1 EXPORTS