--- trunk/lib/Frey/Introspect.pm 2008/11/19 15:28:23 455
+++ trunk/lib/Frey/Introspect.pm 2008/11/19 16:53:13 457
@@ -229,10 +229,8 @@
# $source =~ s{class_methods( $class );
my $runnable = join("\n",
- map { $class_method->{$_} ? qq|$_| : '' } grep { $class->can($_) } Frey::Run->runnable
+ map { qq|$_| : '' } $self->class_runnable( $class );
);
$runnable = " runnable: $runnable" if $runnable;