diff options
Diffstat (limited to 'lib/Pod/Text.pm')
| -rw-r--r-- | lib/Pod/Text.pm | 12 |
1 files changed, 10 insertions, 2 deletions
diff --git a/lib/Pod/Text.pm b/lib/Pod/Text.pm index 089d6b0b18..a23f70a0fc 100644 --- a/lib/Pod/Text.pm +++ b/lib/Pod/Text.pm @@ -1,5 +1,5 @@ # Pod::Text -- Convert POD data to formatted ASCII text. -# $Id: Text.pm,v 3.6 2006-01-25 23:56:52 eagle Exp $ +# $Id: Text.pm,v 3.7 2006-02-19 23:02:35 eagle Exp $ # # Copyright 1999, 2000, 2001, 2002, 2004, 2006 # by Russ Allbery <rra@stanford.edu> @@ -41,7 +41,7 @@ use Pod::Simple (); # Don't use the CVS revision as the version, since this module is also in Perl # core and too many things could munge CVS magic revision strings. This # number should ideally be the same as the CVS revision in podlators, however. -$VERSION = 3.06; +$VERSION = 3.07; ############################################################################## # Initialization @@ -600,6 +600,14 @@ sub parse_from_file { return $retval; } +# Pod::Simple failed to provide this backward compatibility function, so +# implement it ourselves. File handles are one of the inputs that +# parse_from_file supports. +sub parse_from_filehandle { + my $self = shift; + $self->parse_from_file (@_); +} + ############################################################################## # Module return value and documentation ############################################################################## |