X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=gitmo%2FMouse.git;a=blobdiff_plain;f=author%2Fgenerate-mouse-tiny.pl;h=42dd7cb93e59017bf3d1250d296129b4d9514b38;hp=8f039b690e9fee39f3acf622f53a39a99544e0d1;hb=e3ca3ad0571140924ac8a16d454215529e4a2a17;hpb=4dd75d5701a927ee1e6aa1b2d3c765ae0545b8e8 diff --git a/author/generate-mouse-tiny.pl b/author/generate-mouse-tiny.pl index 8f039b6..42dd7cb 100755 --- a/author/generate-mouse-tiny.pl +++ b/author/generate-mouse-tiny.pl @@ -7,6 +7,8 @@ use Fatal qw(open close); #use List::MoreUtils 'uniq'; #use autodie; +print "Generate Mouse::Tiny ...\n"; + sub slurp { open my $in, '<', $_[0]; local $/; @@ -100,3 +102,5 @@ Mouse::Exporter->setup_import_methods(also => 'Mouse'); EOF close $handle; + +print "done.\n";