Parent Directory | Revision Log | Patch
revision 292 by dpavlin, Wed Nov 5 08:21:03 2008 UTC | revision 350 by dpavlin, Sun Nov 16 00:37:34 2008 UTC | |
---|---|---|
# | Line 30 sub markup { | Line 30 sub markup { |
30 | my $self = shift; | my $self = shift; |
31 | my $class = $self->class; | my $class = $self->class; |
32 | use Pod::Simple::HTML; | use Pod::Simple::HTML; |
33 | my $path = eval { $self->package_path( $class ) }; | my $path = eval { $self->class_path( $class ) }; |
34 | if ( $@ ) { | return $self->error( $@ ) if $@; |
warn $@; | ||
return; | ||
} | ||
35 | my $pod = read_file( $path ); | my $pod = read_file( $path ); |
36 | my $converter = Pod::Simple::HTML->new(); | my $converter = Pod::Simple::HTML->new(); |
37 | my $body; | my $body; |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |