X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F91debug.t;h=68e7c57c571741388d94e120d1851d8e9ee89dbc;hb=8999fbced5ffc23f8d2644bd536a255966956f94;hp=46f7c0dc30dd4886091dd1aba608b78f983d3eae;hpb=e5d9ee92012fbc63463ba5b77dc1d5fc4f5be743;p=dbsrgits%2FDBIx-Class.git diff --git a/t/91debug.t b/t/91debug.t index 46f7c0d..68e7c57 100644 --- a/t/91debug.t +++ b/t/91debug.t @@ -18,6 +18,7 @@ ok ( defined( 'debugfh' ); +$schema->storage->debugfh->autoflush(1); my $rs = $schema->resultset('CD')->search({}); $rs->count(); @@ -34,7 +35,6 @@ $log = new IO::File('t/var/foo.log', 'r') or die($!); $line = <$log>; $log->close(); ok($line =~ /^SELECT COUNT/, 'Log success'); - $schema->storage->debugobj->debugfh(undef); delete($ENV{'DBIC_TRACE'}); open(STDERRCOPY, '>&STDERR');