Remove BEGIN from C::Log
Christian Hansen [Mon, 20 Jun 2005 09:43:33 +0000 (09:43 +0000)]
lib/Catalyst/Log.pm

index 26c2fef..d9d03b8 100644 (file)
@@ -8,7 +8,7 @@ our %LEVELS = ();
 
 __PACKAGE__->mk_accessors('level');
 
-BEGIN {
+{
     my @levels = qw[ debug info warn error fatal ];
 
     for ( my $i = 0 ; $i < @levels ; $i++ ) {