X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FCatalyst%2FLog.pm;h=72ae9363cff70501d3bf58bd5ea9c87a366985a8;hb=570ee4337bcafb71a083db0e2b8f02b3cbcf630a;hp=e70197f68b9a371269c8661347781f0c34c5a14a;hpb=1b526dcc8437ccd8c55e8e313f3fe247b6741969;p=catagits%2FCatalyst-Runtime.git diff --git a/lib/Catalyst/Log.pm b/lib/Catalyst/Log.pm index e70197f..72ae936 100755 --- a/lib/Catalyst/Log.pm +++ b/lib/Catalyst/Log.pm @@ -66,8 +66,7 @@ around new => sub { my $class = shift; my $self = $class->$orig; - $self->levels( scalar(@_) ? @_ : keys %LEVELS ); - + $self->levels( scalar(@_) ? @_ : (qw/info warn error fatal/) ); return $self; };