| 229 |
# $source =~ s{</body.*$}{}s; |
# $source =~ s{</body.*$}{}s; |
| 230 |
|
|
| 231 |
|
|
|
use Frey::Run; |
|
|
my $class_method = $self->class_methods( $class ); |
|
| 232 |
my $runnable = join("\n", |
my $runnable = join("\n", |
| 233 |
map { $class_method->{$_} ? qq|<a href="/$class/$_">$_</a>| : '' } grep { $class->can($_) } Frey::Run->runnable |
map { qq|<a href="/$class/$_">$_</a>| : '' } $self->class_runnable( $class ); |
| 234 |
); |
); |
| 235 |
$runnable = " runnable: $runnable" if $runnable; |
$runnable = " runnable: $runnable" if $runnable; |
| 236 |
|
|
Parent Directory
| 
Revision Log
| 
Patch