From: Brandon L. Black Date: Sat, 16 Jun 2007 18:49:33 +0000 (+0000) Subject: autoflush debugfh, plus Changes for this and the weakref thing X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=942cd0c142a828426a2ba3650991188c7c02178c;p=dbsrgits%2FDBIx-Class-Historic.git autoflush debugfh, plus Changes for this and the weakref thing --- diff --git a/Changes b/Changes index 162f2d2..f5f80ad 100644 --- a/Changes +++ b/Changes @@ -1,5 +1,8 @@ Revision history for DBIx::Class + - Fixed DBIC_TRACE debug filehandles to set ->autoflush(1) + - Fixed circular dbh<->storage in HandleError with weakref + 0.07999_06 2007-06-13 04:45:00 - tweaked Row.pm to make last_insert_id take multiple column names - Fixed DBIC::Storage::DBI::Cursor::DESTROY bug that was diff --git a/lib/DBIx/Class/Storage.pm b/lib/DBIx/Class/Storage.pm index 3369069..735ac65 100644 --- a/lib/DBIx/Class/Storage.pm +++ b/lib/DBIx/Class/Storage.pm @@ -7,6 +7,7 @@ use base qw/DBIx::Class/; use Scalar::Util qw/weaken/; use Carp::Clan qw/^DBIx::Class/; +use IO::File; __PACKAGE__->mk_group_accessors('simple' => qw/debug debugobj schema/); @@ -67,6 +68,7 @@ sub new { $fh = IO::File->new('>&STDERR'); } + $fh->autoflush(1); $new->debugfh($fh); $new->debug(1) if $debug_env; diff --git a/lib/DBIx/Class/Storage/DBI.pm b/lib/DBIx/Class/Storage/DBI.pm index d7b9cf9..20948f3 100644 --- a/lib/DBIx/Class/Storage/DBI.pm +++ b/lib/DBIx/Class/Storage/DBI.pm @@ -9,7 +9,6 @@ use DBI; use SQL::Abstract::Limit; use DBIx::Class::Storage::DBI::Cursor; use DBIx::Class::Storage::Statistics; -use IO::File; use Scalar::Util qw/blessed weaken/; __PACKAGE__->mk_group_accessors('simple' =>