From: Dave Rolsky <autarch@urth.org>
Date: Mon, 7 Sep 2009 17:03:27 +0000 (-0500)
Subject: A little test cleanup post-merge
X-Git-Tag: 0.89_02~30
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=a584a0c8453db524aa6e85b4a3f5b9a54f116ef7;p=gitmo%2FMoose.git

A little test cleanup post-merge
---

diff --git a/t/050_metaclasses/012_moose_exporter.t b/t/050_metaclasses/012_moose_exporter.t
index 41cd0f6..8ac6ca3 100644
--- a/t/050_metaclasses/012_moose_exporter.t
+++ b/t/050_metaclasses/012_moose_exporter.t
@@ -312,7 +312,9 @@ BEGIN {
 
     ::ok(!__PACKAGE__->can('does_not_exist'),
          "undefined subs do not get exported");
+}
 
+{
     package AllOptions;
     use Moose ();
     use Moose::Exporter;
@@ -376,12 +378,14 @@ BEGIN {
         prototype( AllOptions->can('with_meta2') ),
         'using correct prototype on with_meta function'
     );
+}
 
-    {
-        package UseAllOptions;
-        AllOptions->unimport();
-    }
+{
+    package UseAllOptions;
+    AllOptions->unimport();
+}
 
+{
     ok( ! UseAllOptions->can($_), "UseAllOptions::$_ has been unimported" )
         for qw( with_meta1 with_meta2 with_caller1 with_caller2 as_is1 );
 }