From: gfx <gfuji@cpan.org>
Date: Mon, 26 Jul 2010 11:30:38 +0000 (+0900)
Subject: Resolve a failing test file although some are skipped
X-Git-Tag: 0.64~3
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=8609b28c495836795fd8d1df60b54ee09e0ebb19;p=gitmo%2FMouse.git

Resolve a failing test file although some are skipped
---

diff --git a/t/020_attributes/failing/004_attribute_triggers.t b/t/020_attributes/004_attribute_triggers.t
similarity index 97%
rename from t/020_attributes/failing/004_attribute_triggers.t
rename to t/020_attributes/004_attribute_triggers.t
index d7dd0e6..1d25f57 100644
--- a/t/020_attributes/failing/004_attribute_triggers.t
+++ b/t/020_attributes/004_attribute_triggers.t
@@ -5,11 +5,10 @@ use warnings;
 
 use Scalar::Util 'isweak';
 
-use Test::More tests => 43;
+use Test::More;
 use Test::Exception;
 
 
-
 {
     package Foo;
     use Mouse;
@@ -183,6 +182,9 @@ use Test::Exception;
 
     $attr->set_value( $foo, 3 );
 
+    note 'skip Moose specific features';
+    last;
+
     is_deeply(
         \@Foo::calls,
         [ [ $foo, 3, 2 ] ],
@@ -201,6 +203,9 @@ use Test::Exception;
 }
 
 {
+    note 'skip Moose specific features';
+    last;
+
     my $foo = Foo->new(foo => 2);
     is_deeply(
         \@Foo::calls,
@@ -219,4 +224,4 @@ use Test::Exception;
     Foo->meta->make_immutable, redo if Foo->meta->is_mutable;
 }
 
-
+done_testing;