This is an automated email from the git hooks/post-receive script. kanashiro-guest pushed a commit to branch master in repository carton.
commit 649ae68b13a7ad5f98fd260c8a759fa1fa369e81 Author: Tatsuhiko Miyagawa <miyag...@bulknews.net> Date: Fri May 31 08:45:28 2013 +0900 Woo, WTF femove Makefile.PL --- Makefile.PL | 70 ------------------------------------------------------------- 1 file changed, 70 deletions(-) diff --git a/Makefile.PL b/Makefile.PL deleted file mode 100644 index 7caa702..0000000 --- a/Makefile.PL +++ /dev/null @@ -1,70 +0,0 @@ -use inc::Module::Install; -use Module::Install::CPANfile; - -name 'carton'; -version_from 'lib/Carton.pm'; -perl_version '5.008001'; -license_from 'lib/Carton.pod'; -author_from 'lib/Carton.pod'; -readme_from('lib/Carton.pod'); - -cpanfile; - -install_script 'bin/carton'; - -doc_to_pods(); - -build_requires 'Test::More', 0.88; -test_requires 'Test::Requires'; -auto_set_repository(); -auto_provides; - -resources - homepage => 'https://github.com/miyagawa/carton', - bugtracker => 'https://github.com/miyagawa/carton/issues'; - -WriteAll; - -sub doc_to_pods { - # lib/Carton/Doc/*.pod => docs/carton-*.pod => blib/man1/carton-*.1 - - my %pods; - - for my $file ("lib/Carton.pod", glob "lib/Carton/Doc/*.pod") { - my $base = ($file =~ m!lib/(.*?)\.pod!)[0]; - $base =~ s!/!::!g; - my $name = $base eq 'Carton' ? "carton" : ("carton-" . lc( (split /::/, $base)[-1] )); - my $doc = "docs/$name.pod"; - - if ($Module::Install::AUTHOR) { - mkdir "docs", 0777; - copy_pod($file, $doc, $base => $name); - } - - $pods{$doc} = "blib/man1/$name.1" - } - - makemaker_args MAN1PODS => \%pods; -} - -sub copy_pod { - my($src, $dest, $pod_name, $man) = @_; - - warn "Copying $src -> $dest\n"; - - open my $in, "<", $src or die "$src: $!"; - open my $out, ">", $dest or die "$dest: $!"; - - my $match; - while (<$in>) { - unless ($match) { - s/^$pod_name - /$man - / - and $match++; - } - print $out $_; - } - - unless ($match) { - die "Couldn't find NAME $pod_name in $src"; - } -} -- Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/carton.git _______________________________________________ Pkg-perl-cvs-commits mailing list Pkg-perl-cvs-commits@lists.alioth.debian.org http://lists.alioth.debian.org/cgi-bin/mailman/listinfo/pkg-perl-cvs-commits