From: Dave Rolsky <autarch@urth.org>
Date: Fri, 17 Sep 2010 20:42:52 +0000 (-0500)
Subject: Fix warnings
X-Git-Tag: 1.15~147
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=04bcce6a8b5ccd5933afe826900941805d3db685;p=gitmo%2FMoose.git

Fix warnings
---

diff --git a/t/070_native_traits/202_trait_array.t b/t/070_native_traits/202_trait_array.t
index 490aa51..1a3020f 100644
--- a/t/070_native_traits/202_trait_array.t
+++ b/t/070_native_traits/202_trait_array.t
@@ -606,8 +606,8 @@ sub run_tests {
         qr/The second argument must be a code reference/,
             'throws an error with when passing a non code ref to natatime';
 
-        my $it = $obj->natatime_curried();
-        my @nat;
+        $it = $obj->natatime_curried();
+        @nat = ();
         while ( my @v = $it->() ) {
             push @nat, \@v;
         }