Parent Directory | Revision Log | Patch
revision 344 by dpavlin, Sat Nov 15 16:10:45 2008 UTC | revision 350 by dpavlin, Sun Nov 16 00:37:34 2008 UTC | |
---|---|---|
# | Line 31 sub markup { | Line 31 sub markup { |
31 | my $class = $self->class; | my $class = $self->class; |
32 | use Pod::Simple::HTML; | use Pod::Simple::HTML; |
33 | my $path = eval { $self->class_path( $class ) }; | my $path = eval { $self->class_path( $class ) }; |
34 | if ( $@ ) { | return $self->error( $@ ) if $@; |
warn $@; | ||
return qq|<div class="error"><code>$@</code></div>|; | ||
} | ||
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 |