testing diagnostics

This commit is contained in:
Graham Ollis committed 2013-02-23 03:05:25 -05:00
1 parent 380cea8aa2
commit 1708622c49
2 files changed
+7 -3

No files matched your search

+6 -3
View File
@@ -21,11 +21,14 @@ $t->get_ok('/')
->status_is(500)
->content_like(qr{foo});
$t->app->log->on(message => sub {
my($log, $level, @lines) = @_;
diag @lines if $level eq 'error';
});
$t->get_ok('/bar')
->status_is(200)
->content_like(qr{bar});
#note $t->tx->res->to_string;
->content_like(qr{sometimes, the bar,});
__DATA__