X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=maint%2FMakefile.PL.include;h=71e2eaf206f84f773fe7473bea873e07302633e5;hb=fb0f5964bfe05daa3f82ec9261cfc0bb9d181223;hp=127b2d67667917f60985bd352e64f68a6a173644;hpb=51c8325b5e4c5b68d3f823df3f0f04d9f05ed6d9;p=scpubgit%2FTak.git

diff --git a/maint/Makefile.PL.include b/maint/Makefile.PL.include
index 127b2d6..71e2eaf 100644
--- a/maint/Makefile.PL.include
+++ b/maint/Makefile.PL.include
@@ -1,9 +1,23 @@
 BEGIN { -e 'Distar' or system("git clone git://git.shadowcat.co.uk/p5sagit/Distar.git") }
 use lib 'Distar/lib';
 use Distar;
+use IO::All;
 
 author 'mst - Matt S. Trout (cpan:MSTROUT) <mst@shadowcat.co.uk>';
 
+manifest_include bin => qr/[^.].*/;
+
+# rebuild the fatpacked lib/Tak/STDIONode.pm
 system("maint/mk-fat");
 
+# rip the example Takfile out of the synopsis so I can play with it
+# more easily
+my $tak_pm = io('lib/Tak.pm')->all;
+
+my ($takfile) = $tak_pm =~ /(  package Tak::MyScript.*?  1;\n)/s;
+
+$takfile =~ s/^  //mg;
+
+io('Takfile')->print($takfile);
+
 1;