--- trunk/lib/Frey/Test/Runner.pm 2008/11/25 13:39:44 511 +++ trunk/lib/Frey/Test/Runner.pm 2008/11/25 13:47:46 512 @@ -102,7 +102,9 @@ warn "got ",length($html), " bytes"; while ( $html =~ s{()}{}gs ) { - $self->add_head( $1 ); + my $style = $1; + $style =~ s[((?:body|html)\s+{[^}]+})][/\* $1 \*/]sg; # remove some styles + $self->add_head( $style ); } $self->add_head(qq| @@ -112,6 +114,7 @@ td.results:hover ul.test-out { display: block; } |); + $html =~ s{}{}sg; # remove menu which doesn't work without JavaScript $html =~ s{^.*}{}s; $html =~ s{.*$}{}s;