From: Jesse Luehrs Date: Sun, 17 Oct 2010 21:37:03 +0000 (-0500) Subject: use MOOSE_ERROR_STYLE rather than MOOSE_ERROR_TERSE X-Git-Tag: 1.16~19 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=21bfbf0ec48e28495727f630e64349b1b08d5014;p=gitmo%2FMoose.git use MOOSE_ERROR_STYLE rather than MOOSE_ERROR_TERSE --- diff --git a/lib/Moose/Error/Default.pm b/lib/Moose/Error/Default.pm index 41d6764..2588083 100644 --- a/lib/Moose/Error/Default.pm +++ b/lib/Moose/Error/Default.pm @@ -17,7 +17,7 @@ Class::MOP::MiniTrait::apply(__PACKAGE__, 'Moose::Meta::Object::Trait'); sub new { my ( $self, @args ) = @_; - if(exists $ENV{MOOSE_ERROR_TERSE} && $ENV{MOOSE_ERROR_TERSE}) { + if(exists $ENV{MOOSE_ERROR_STYLE} && $ENV{MOOSE_ERROR_STYLE} eq 'croak') { $self->create_error_croak( @args ); } else { @@ -67,7 +67,7 @@ This class implements L based error generation. The default behavior is like L. To override this to default to L's behaviour on a system wide basis, -set the MOOSE_ERROR_TERSE environment variable to a true value. +set the MOOSE_ERROR_STYLE environment variable to C. =head1 METHODS