Switch to Mouse::Exporter

[gitmo/Mouse.git] / author / generate-mouse-tiny.pl

diff --git a/author/generate-mouse-tiny.pl b/author/generate-mouse-tiny.pl
index 1cc4237..4799507 100755 (executable)
--- a/author/generate-mouse-tiny.pl
+++ b/author/generate-mouse-tiny.pl
@@ -6,7 +6,8 @@ use File::Slurp 'slurp';
 use List::MoreUtils 'uniq';
 use autodie;
 
-unlink 'lib/Mouse/Tiny.pm';
+unlink 'lib/Mouse/Tiny.pm'
+    if -e 'lib/Mouse/Tiny.pm';
 
 my @files;
 
@@ -15,6 +16,7 @@ find({
         push @files, $_
             if -f $_
             && !/Squirrel/
+            && !/TypeRegistory/
             && !/\bouse/
             && !/\.sw[po]$/
     },
@@ -62,6 +64,8 @@ print { $handle } << 'EOF';
 package Mouse::Tiny;
 use base 'Mouse';
 
+Mouse::Exporter->setup_import_methods(also => 'Mouse');
+
 EOF
 
 print { $handle } "1;\n\n";