--- trunk/lib/Frey/Introspect.pm 2008/12/01 23:28:27 662 +++ trunk/lib/Frey/Introspect.pm 2008/12/02 19:10:36 688 @@ -213,10 +213,11 @@ } $table .= qq||; + my $path = $self->class_path( $class ); + my $pod = Frey::Pod->new( class => $class, request_url => $self->request_url )->as_markup; - $pod = $pod->{body} if ref($pod); + return $pod if $path =~ m{\.pod}; - my $path = $self->class_path( $class ); my $Document = PPI::Document->new( $path ); # Create a reusable syntax highlighter