| 223 |
# $source =~ s{^.*<body[^>]+>}{}s; |
# $source =~ s{^.*<body[^>]+>}{}s; |
| 224 |
# $source =~ s{</body.*$}{}s; |
# $source =~ s{</body.*$}{}s; |
| 225 |
|
|
|
|
|
| 226 |
my $runnable = join("\n", |
my $runnable = join("\n", |
| 227 |
map { |
map { |
| 228 |
qq|<a target="$_" href="/$class/$_">$_</a>| |
qq|<a target="$class" href="/$class/$_">$_</a>| |
| 229 |
} $self->class_runnable( $class ) |
} $self->class_runnable( $class ) |
| 230 |
); |
); |
| 231 |
$runnable = " runnable: $runnable" if $runnable; |
$runnable = " runnable: $runnable" if $runnable; |
| 237 |
$has_tests = |
$has_tests = |
| 238 |
'<br/>test' . ( $#tests > 0 ? 's' : '' ) . ': ' . |
'<br/>test' . ( $#tests > 0 ? 's' : '' ) . ': ' . |
| 239 |
join("\n", map { |
join("\n", map { |
| 240 |
qq|<a target="test" href="/Frey::Test::Runner/as_markup?test=$_">$_</a>| |
qq|<a target="$class" href="/Frey::Test::Runner/as_markup?test=$_">$_</a>| |
| 241 |
} @tests ); |
} @tests ); |
| 242 |
} |
} |
| 243 |
|
|
Parent Directory
| 
Revision Log
| 
Patch