* Look only one class at default.

diff --git a/lib/MooseX/Getopt.pm b/lib/MooseX/Getopt.pm
index a915d5a..1e7c91a 100644 (file)
--- a/lib/MooseX/Getopt.pm
+++ b/lib/MooseX/Getopt.pm
@@ -48,7 +48,9 @@ sub new_with_options {
 
     my $getopt = defined $params{getopt}
                  ? $params{getopt}
-                 : $class->_default_getopt_session->new;
+                 : $class->_default_getopt_session->new(
+                      classes_filter => sub { $_ eq $class }
+                  );
 
     my %options = $getopt->options;