--- trunk/lib/Frey/Pod.pm 2008/11/16 00:25:39 349 +++ trunk/lib/Frey/Pod.pm 2008/11/16 00:37:34 350 @@ -31,12 +31,7 @@ my $class = $self->class; use Pod::Simple::HTML; my $path = eval { $self->class_path( $class ) }; - if ( $@ ) { - warn $@; - my $error = $@; - $error =~ s{\s+(\S+)\s+line\s+(\d+)}{ $1 line $2}gsm; - return qq|
$error
|; - } + return $self->error( $@ ) if $@; my $pod = read_file( $path ); my $converter = Pod::Simple::HTML->new(); my $body;