--- trunk/lib/Frey.pm 2009/01/09 14:52:58 968 +++ trunk/lib/Frey.pm 2009/06/30 13:54:10 1123 @@ -12,7 +12,7 @@ has 'debug' => ( is => 'rw', isa => 'Int', - default => 0, + default => sub { $ENV{FREY_DEBUG} || 0 }, ); =head1 NAME