X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=tool%2Fgenerate-mouse-tiny.pl;h=cd9389a214a5842f4d51268b292b3a4aa0603436;hb=31aa6299ca20515174f1b145e5b3d4dbd9e09a08;hp=d521f9522c909e9e006d13ab8da52ccaf1087238;hpb=c10b6ba9524e57ee153bfc280cd1548aa5ee1f20;p=gitmo%2FMouse.git

diff --git a/tool/generate-mouse-tiny.pl b/tool/generate-mouse-tiny.pl
index d521f95..cd9389a 100644
--- a/tool/generate-mouse-tiny.pl
+++ b/tool/generate-mouse-tiny.pl
@@ -32,6 +32,7 @@ find({
             &&  /\.pm$/
             && !/Squirrel/
             && !/Tiny/
+            && !/Test/         # only for testing
             && !/Spec/         # has no functionality
             && !/TypeRegistry/ # deprecated
             && !/\bouse/       # ouse.pm
@@ -67,7 +68,8 @@ print { $handle } << "EOF";
 # This file was generated by $0 from Mouse $Mouse::Spec::VERSION.
 #
 # ANY CHANGES MADE HERE WILL BE LOST!
-
+use strict;
+use warnings;
 EOF
 
 print { $handle } << 'EOF';
@@ -95,9 +97,11 @@ END_OF_TINY
 } # unless Mouse.pm is loaded
 EOF
 
-print { $handle } << 'EOF';
+print { $handle } << "EOF";
 package Mouse::Tiny;
 
+our \$VERSION = '$Mouse::Spec::VERSION';
+
 Mouse::Exporter->setup_import_methods(also => 'Mouse');
 
 1;