X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FMouse%2FObject.pm;h=72e929bd936f46598b77d6bdcd90a709cc6dddea;hb=6e64f8097e17ea8b7b950fee35046dfa43a5b4f3;hp=8aab6195384773561cff077024406a8e5af4a9d5;hpb=034587d897c53d4df84085a9229334bd2d51f1c6;p=gitmo%2FMouse.git diff --git a/lib/Mouse/Object.pm b/lib/Mouse/Object.pm index 8aab619..72e929b 100644 --- a/lib/Mouse/Object.pm +++ b/lib/Mouse/Object.pm @@ -4,7 +4,7 @@ use Mouse::Util qw(does dump); # enables strict and warnings sub new { my $class = shift; - $class->throw_error('Cannot call new() on an instance') if ref $class; + $class->meta->throw_error('Cannot call new() on an instance') if ref $class; my $args = $class->BUILDARGS(@_);