Cleanup Makefile.PL, etc.
Fuji, Goro [Thu, 23 Sep 2010 06:05:57 +0000 (15:05 +0900)]
.gitignore
MANIFEST.SKIP
Makefile.PL
lib/Mouse/Util.pm
tool/create-moose-compatibility-tests.pl
xt/002-pod_spell.t

index b0ae5a0..a9e073e 100644 (file)
@@ -13,7 +13,7 @@ Mouse-*
 *~
 *.bak
 *.old
-xt/compatibility/
+xt/compat/
 cover_db/*
 nytprof*
 *.out
index 8e5a18d..e16e1cc 100644 (file)
@@ -36,7 +36,7 @@
 
 
 # Moose specific tests
-xt/compatibility
+xt/compat
 xt/external
 t/.*/failing
 
index f340858..891bfa0 100755 (executable)
@@ -58,19 +58,17 @@ CHECK
 my $use_xs = ($] >= 5.008_001 && want_xs());
 
 if($use_xs){
-    print "Mouse configured with XS.\n",
-          "NOTE: You can try --pp option to configure Mouse with Pure Perl.\n";
+    print "Mouse configured with XS.\n";
 
-    cc_warnings();
     use_ppport(3.19);
     use_xshelper();
+    cc_warnings();
     cc_src_paths('xs-src');
 }
 else{
     print "Mouse configured with Pure Perl.\n";
 }
 
-
 tests 't/*.t t/*/*.t';
 author_tests 'xt';
 
@@ -82,20 +80,16 @@ if ($Module::Install::AUTHOR) {
 
     if (eval { require Moose; Moose->VERSION($require_version) }) {
         print "You have Moose ", Moose->VERSION, ".\n";
-        if (eval { require Module::Install::AuthorTests }) {
-            do 'tool/create-moose-compatibility-tests.pl';
-            # repeat testing
-            # see also ExtUtils::MM_Any::test_via_harness()
-            my $t_moose =  q{$(FULLPERLRUN) -MExtUtils::Command::MM -e}
-                          .q{ "test_harness($(TEST_VERBOSE), '$(INST_LIB)', '$(INST_ARCHLIB)')"}
-                          .q{ xt/compatibility/t/*/*.t } . "\n";
-
-            postamble qq{test_dynamic :: test_moose\n\n}
-                    . qq{test_moose :: pure_all\n}
-                    . qq{\t} . $t_moose;
-        } else {
-            print "You don't have a M::I::AuthorTests.\n";
-        }
+        do 'tool/create-moose-compatibility-tests.pl';
+        # repeat testing
+        # see also ExtUtils::MM_Any::test_via_harness()
+        my $t_moose =  q{$(FULLPERLRUN) -MExtUtils::Command::MM -e}
+                      .q{ "test_harness($(TEST_VERBOSE), '$(INST_LIB)', '$(INST_ARCHLIB)')"}
+                      .q{ xt/compat/t/*/*.t } . "\n";
+
+        postamble qq{test :: test_moose\n\n}
+                . qq{test_moose :: pure_all\n}
+                . qq{\t} . $t_moose;
     } else {
         print "You don't have Moose $require_version. skipping moose compatibility test\n";
     }
@@ -107,7 +101,7 @@ if ($Module::Install::AUTHOR) {
                    .q{ "do 'tool/force-pp.pl'; test_harness($(TEST_VERBOSE), '$(INST_LIB)', '$(INST_ARCHLIB)')"}
                    .q{ $(TEST_FILES)} . "\n";
 
-        postamble qq{test_dynamic :: test_pp\n\n}
+        postamble qq{test :: test_pp\n\n}
                 . qq{test_pp :: pure_all\n}
                 . qq{\t} . $t_pp;
     }
index 076ca34..307531a 100644 (file)
@@ -395,7 +395,7 @@ The same as C<Mouse::Util::class_of()>.
 
 =head2 Class::MOP functions
 
-The followign functions are not exportable.
+The following functions are not exportable.
 
 =head3 C<< Mouse::Util::is_class_loaded($classname) -> Bool >>
 
index 05f33ce..9508364 100644 (file)
@@ -6,9 +6,9 @@ use File::Path ();
 use File::Spec ();
 use File::Basename ();
 
-print "Creating compatibility tests in xt/compatibility/* ...\n";
+print "Creating compatibility tests in xt/compat/* ...\n";
 
-File::Path::rmtree(File::Spec->catfile('xt', 'compatibility'));
+File::Path::rmtree(File::Spec->catfile('xt', 'compat'));
 
 # some test does not pass... currently skip it.
 my %SKIP_TEST = (
@@ -51,7 +51,7 @@ File::Find::find(
 
             my $dirname = File::Basename::dirname($_);
 
-            my $tmpdir = File::Spec->catfile('xt', 'compatibility', $dirname);
+            my $tmpdir = File::Spec->catfile('xt', 'compat', $dirname);
             File::Path::mkpath($tmpdir);
 
             my $tmpfile = File::Spec->catfile($tmpdir, $basename);
index 212886f..3549727 100644 (file)
@@ -163,6 +163,7 @@ destructuring
 dev
 DWIM
 DUCKTYPE
+exportable
 GitHub
 hashrefs
 hotspots