--- trunk/lib/Frey/Introspect.pm	2008/11/18 16:54:10	418
+++ trunk/lib/Frey/Introspect.pm	2008/11/19 15:28:23	455
@@ -103,15 +103,7 @@
 	return $out;
 }
 
-=head1 OUTPUT GENERATION
-
-=head2 markup
-
-  $o->markup;
-
-=cut
-
-sub markup {
+sub as_markup {
 	my ( $self ) = @_;
 
 	$self->add_head( 'static/introspect.css' );
@@ -211,7 +203,7 @@
 	}
 	$table .= qq|</table>|;
 
-	my $pod = Frey::Pod->new( class => $class )->markup;
+	my $pod = Frey::Pod->new( class => $class )->as_markup;
 	$pod = $pod->{body} if ref($pod);
 
 	my $path = $self->class_path( $class );