diff options
author | Jesse Vincent <jesse@bestpractical.com> | 2009-10-01 01:02:24 +0900 |
---|---|---|
committer | Jesse Vincent <jesse@bestpractical.com> | 2009-10-01 01:04:31 +0900 |
commit | 63377b8da2054ffc5c248cb3d1cfdfd4f13f1c9f (patch) | |
tree | 67a117452778d2c3e7ae252d906b7444d861e91e /dist | |
parent | 2a1c7641e3ae3b554a2352854dba5d438a05e401 (diff) | |
download | perl-63377b8da2054ffc5c248cb3d1cfdfd4f13f1c9f.tar.gz |
Update Pod::Plainer to 1.01 like Maintainers.pl says it is
Diffstat (limited to 'dist')
-rw-r--r-- | dist/Pod-Plainer/Plainer.pm | 32 | ||||
-rw-r--r-- | dist/Pod-Plainer/t/plainer.t | 2 |
2 files changed, 33 insertions, 1 deletions
diff --git a/dist/Pod-Plainer/Plainer.pm b/dist/Pod-Plainer/Plainer.pm index f64eb601ed..11059b2509 100644 --- a/dist/Pod-Plainer/Plainer.pm +++ b/dist/Pod-Plainer/Plainer.pm @@ -1,9 +1,11 @@ package Pod::Plainer; +use 5.006; use strict; +use warnings; use if $] >= 5.011, 'deprecate'; use Pod::Parser; our @ISA = qw(Pod::Parser); -our $VERSION = '1.00'; +our $VERSION = '1.01'; our %E = qw( < lt > gt ); @@ -54,6 +56,25 @@ and returns the old(er) style with just 'CE<lt>E<gt>'; This can be used to pre-process Pod before using tools which do not recognise the new style Pods. +=head2 METHODS + +=over + +=item escape_ltgt + +Replace '<' and '>' by 'EE<lt>ltE<gt>' and 'EE<lt>gtE<gt>'. + +=item simple_delimiters + +Replace delimiters by 'E<lt>' and 'E<gt>'. + +=item textblock + +Redefine C<textblock> from L<Pod::Parser> to use C<escape_ltgt> +and C<simple_delimiters>. + +=back + =head2 EXPORT None by default. @@ -66,5 +87,14 @@ Robin Barker, rmb1@npl.co.uk See L<Pod::Parser>. +=head1 COPYRIGHT AND LICENSE + +Copyright (C) 2009 by Robin Barker + +This library is free software; you can redistribute it and/or modify +it under the same terms as Perl itself, either Perl version 5.10.1 or, +at your option, any later version of Perl 5 you may have available. + =cut +$Id: Plainer.pm 250 2009-09-20 18:02:00Z rmb1 $ diff --git a/dist/Pod-Plainer/t/plainer.t b/dist/Pod-Plainer/t/plainer.t index c6f178a253..e226494bbc 100644 --- a/dist/Pod-Plainer/t/plainer.t +++ b/dist/Pod-Plainer/t/plainer.t @@ -38,6 +38,8 @@ END { 1 while unlink $output; } +# $Id: plainer.t 247 2009-09-15 18:33:34Z rmb1 $ + __END__ =head <> now reads in records =head E<lt>E<gt> now reads in records |