--- trunk/lib/Frey/Introspect.pm 2008/11/05 20:12:50 313 +++ trunk/lib/Frey/Introspect.pm 2008/11/05 20:18:33 314 @@ -229,13 +229,13 @@ my $pod = Frey::Pod->new( class => $class )->markup; use Frey::Run; - my $execute = join("\n", map { qq|$_| } grep { $class->can($_) } Frey::Run->execute ); - $execute = " execute: $execute" if $execute; + my $runnable = join("\n", map { qq|$_| } grep { $class->can($_) } Frey::Run->runnable ); + $runnable = " runnable: $runnable" if $runnable; my $html = $self->page( title => "Introspect $class", body => qq|

$class

| - . qq|
$superclasses\n$roles\n$execute\n| + . qq|
$superclasses\n$roles\n$runnable\n| . ( $pod ? qq|↓pod&darr| : '' ) . qq|$table\n$pod
|