@@ -0,0 +1,7 @@
+Revision history for Pod-Elemental-PerlMunger
+
+0.093330 2009-11-29 08:43:08 America/New_York
+ throw exception if PPI parsing fails
+
+0.093020 2009-10-28
+ first release
@@ -1,6 +1,8 @@
+Changes
LICENSE
MANIFEST
META.json
+META.yml
Makefile.PL
README
dist.ini
@@ -1,13 +1,13 @@
{
"resources" : {
- "repository" : "origin"
+ "repository" : "http://github.com/rjbs/pod-elemental-perlmunger"
},
"meta-spec" : {
"version" : 1.4,
"url" : "http://module-build.sourceforge.net/META-spec-v1.4.html"
},
- "generated_by" : "Dist::Zilla version 1.092990",
- "version" : "0.093020",
+ "generated_by" : "Dist::Zilla version 1.093290",
+ "version" : "0.093330",
"name" : "Pod-Elemental-PerlMunger",
"author" : [
"Ricardo SIGNES <rjbs@cpan.org>"
@@ -21,3 +21,4 @@
},
"abstract" : "a thing that takes a string of Perl and rewrites its documentation"
}
+
@@ -0,0 +1,18 @@
+---
+abstract: 'a thing that takes a string of Perl and rewrites its documentation'
+author:
+ - 'Ricardo SIGNES <rjbs@cpan.org>'
+generated_by: 'Dist::Zilla version 1.093290'
+license: perl
+meta-spec:
+ url: http://module-build.sourceforge.net/META-spec-v1.4.html
+ version: 1.4
+name: Pod-Elemental-PerlMunger
+requires:
+ Moose: 0
+ PPI: 0
+ Pod::Elemental: 0.092941
+ namespace::autoclean: 0
+resources:
+ repository: http://github.com/rjbs/pod-elemental-perlmunger
+version: 0.093330
@@ -2,6 +2,8 @@
use strict;
use warnings;
+
+
use ExtUtils::MakeMaker;
WriteMakefile(
@@ -9,7 +11,7 @@ WriteMakefile(
NAME => 'Pod::Elemental::PerlMunger',
AUTHOR => "Ricardo\ SIGNES\ \<rjbs\@cpan\.org\>",
ABSTRACT => "a\ thing\ that\ takes\ a\ string\ of\ Perl\ and\ rewrites\ its\ documentation",
- VERSION => '0.093020',
+ VERSION => '0.093330',
EXE_FILES => [ qw() ],
(eval { ExtUtils::MakeMaker->VERSION(6.31) } ? (LICENSE => 'perl') : ()),
PREREQ_PM => {
@@ -1,7 +1,7 @@
This archive contains the distribution Pod-Elemental-PerlMunger, version
-0.093020:
+0.093330:
a thing that takes a string of Perl and rewrites its documentation
@@ -1,5 +1,5 @@
package Pod::Elemental::PerlMunger;
-our $VERSION = '0.093020';
+our $VERSION = '0.093330';
use Moose::Role;
@@ -16,6 +16,7 @@ around munge_perl_string => sub {
my ($orig, $self, $perl, $arg) = @_;
my $ppi_document = PPI::Document->new(\$perl);
+ confess(PPI::Document->errstr) unless $ppi_document;
my @pod_tokens = map {"$_"} @{ $ppi_document->find('PPI::Token::Pod') || [] };
$ppi_document->prune('PPI::Token::Pod');
@@ -71,7 +72,7 @@ Pod::Elemental::PerlMunger - a thing that takes a string of Perl and rewrites it
=head1 VERSION
-version 0.093020
+version 0.093330
=head1 OVERVIEW