From: Graham Knop <haarg@haarg.org>
Date: Thu, 18 Apr 2013 19:57:49 +0000 (-0400)
Subject: fix overload-coderefs test
X-Git-Tag: v1.002000~23
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=235b63fc17ce97b0d16c5cb7f81a4423ce1427b5;p=gitmo%2FMoo.git

fix overload-coderefs test
---

diff --git a/t/overloaded-coderefs.t b/t/overloaded-coderefs.t
index c4b1d6b..5e59ae8 100644
--- a/t/overloaded-coderefs.t
+++ b/t/overloaded-coderefs.t
@@ -9,7 +9,8 @@ use Test::More;
 		fallback => 1;
 	sub new {
 		my $class = shift;
-		bless \$_[0], $class;
+		my $code = shift;
+		bless \$code, $class;
 	}
 	sub to_code {
 		my $self = shift;