diff options
Diffstat (limited to 'Master/tlpkg/tlperl/lib/Pod/Simple/Methody.pm')
| -rw-r--r-- | Master/tlpkg/tlperl/lib/Pod/Simple/Methody.pm | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/Master/tlpkg/tlperl/lib/Pod/Simple/Methody.pm b/Master/tlpkg/tlperl/lib/Pod/Simple/Methody.pm index bed3e8662b2..0d69b7a1d99 100644 --- a/Master/tlpkg/tlperl/lib/Pod/Simple/Methody.pm +++ b/Master/tlpkg/tlperl/lib/Pod/Simple/Methody.pm @@ -4,7 +4,7 @@ package Pod::Simple::Methody; use strict; use Pod::Simple (); use vars qw(@ISA $VERSION); -$VERSION = '3.14'; +$VERSION = '3.16'; @ISA = ('Pod::Simple'); # Yes, we could use named variables, but I want this to be impose @@ -51,12 +51,12 @@ Pod::Simple::Methody -- turn Pod::Simple events into method calls use strict; package SomePodFormatter; use base qw(Pod::Simple::Methody); - + sub handle_text { my($self, $text) = @_; ... } - + sub start_head1 { my($self, $attrs) = @_; ... @@ -65,7 +65,7 @@ Pod::Simple::Methody -- turn Pod::Simple events into method calls my($self) = @_; ... } - + ...and start_/end_ methods for whatever other events you want to catch. =head1 DESCRIPTION |