From: Dave Rolsky <autarch@urth.org>
Date: Sat, 21 Feb 2009 15:28:35 +0000 (+0000)
Subject: We were leaving the package name in the arg list
X-Git-Tag: 0.71_01~11
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=6b83828f50414e18c31109c8c790158b7c0a7820;p=gitmo%2FMoose.git

We were leaving the package name in the arg list
---

diff --git a/lib/Moose/Util/TypeConstraints.pm b/lib/Moose/Util/TypeConstraints.pm
index 41fdc2d..3980c55 100644
--- a/lib/Moose/Util/TypeConstraints.pm
+++ b/lib/Moose/Util/TypeConstraints.pm
@@ -667,6 +667,7 @@ sub add_parameterizable_type {
 }
 
 sub _throw_error {
+    shift;
     require Moose;
     unshift @_, 'Moose';
     goto &Moose::throw_error;