X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FCatalyst.pm;h=f9cae7ab2aecfab5a03b13d5403cb29212fc51c6;hb=eb0d3cdea253b57559d190821a4f11b6265661ab;hp=fbc036ae18836ddb2bb4c4b9d3d7d11479c413c2;hpb=13adef053b8aa0db602b8e783c69b4227cc584f4;p=catagits%2FCatalyst-Runtime.git diff --git a/lib/Catalyst.pm b/lib/Catalyst.pm index fbc036a..f9cae7a 100755 --- a/lib/Catalyst.pm +++ b/lib/Catalyst.pm @@ -1252,9 +1252,12 @@ EOF } $class->setup_finalize; - # Should be the last thing we do so that user things hooking - # setup_finalize can log.. - $class->log->_flush() if $class->log->can('_flush'); + + # Turn autoflush back off once setup is finished. + # TODO: this is being done purely for Static::Simple (legacy API), and has been suggested by + # mst to be removed and require/update Static::Simple to set this flag itself + $class->log->autoflush(0) if ($class->log->can('autoflush')); + return $class || 1; # Just in case someone named their Application 0... } @@ -2947,6 +2950,9 @@ sub setup_log { unless ( $class->log ) { $class->log( Catalyst::Log->new(keys %levels) ); } + + # Turn on autoflush by default: + $class->log->autoflush(1) if ($class->log->can('autoflush')); if ( $levels{debug} ) { Class::MOP::get_metaclass_by_name($class)->add_method('debug' => sub { 1 }); @@ -3587,7 +3593,7 @@ example given above, which uses L to provide either L it installed (if you want the faster XS parser, add it to you project Makefile.PL or dist.ini, cpanfile, etc.) -The C configuation is a hashref whose keys are HTTP Content-Types +The C configuration is a hashref whose keys are HTTP Content-Types (matched against the incoming request type using a regexp such as to be case insensitive) and whose values are coderefs that receive a localized version of C<$_> which is a filehandle object pointing to received body.