Apply a patch contributed by chocolateboy (RT #54383) to allow "use Mouse::Tiny VERSION"
gfx [Mon, 8 Feb 2010 03:38:21 +0000 (12:38 +0900)]
tool/generate-mouse-tiny.pl

index fab7e68..045387d 100644 (file)
@@ -96,9 +96,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;