Don't include tests on native traits

[gitmo/Mouse.git] / author / import-moose-test.pl

diff --git a/author/import-moose-test.pl b/author/import-moose-test.pl
index 559b8d3..fcb6db8 100644 (file)
--- a/author/import-moose-test.pl
+++ b/author/import-moose-test.pl
@@ -10,10 +10,11 @@ my($moose_dir, $result) = @ARGV;
 unless(defined $moose_dir and -d "$moose_dir/t") {
     die "Usage: $0 Moose-dir [result-dir]\n";
 }
-$result //= 't';
+$result //= 'Moose-t';
 
 my @tests;
 sub wanted {
+    return if /native_traits/;
     (my $mouse_test         = $_) =~ s{\A $moose_dir/t }{$result}xmso;
     (my $mouse_failing_test = $_) =~ s{\A $moose_dir/t }{$result-failing}xmso;
     if( -d $_ ) {