made tests sane

This commit is contained in:
Finn 2018-03-20 18:46:50 +00:00
parent 73d44feace
commit 49e5e91860

View file

@ -114,6 +114,8 @@ sub dump_error {
my $self = shift; my $self = shift;
if ( my $error = $self->tx->res->dom->at('pre[id="error"]') ) { if ( my $error = $self->tx->res->dom->at('pre[id="error"]') ) {
diag $error->text; diag $error->text;
} elsif ( my $route_error = $self->tx->res->dom->at('div[id="routes"] > p') ) {
diag $route_error->content;
} else { } else {
diag $self->tx->res->to_string; diag $self->tx->res->to_string;
} }