Convert all tests to done_testing.
[gitmo/Moose.git] / t / 020_attributes / 026_attribute_without_any_methods.t
index c6f1348..0a2d579 100644 (file)
@@ -3,20 +3,22 @@
 use strict;
 use warnings;
 
-use Test::More tests => 2;
+use Test::More;
 
 use Moose ();
 use Moose::Meta::Class;
 
-my $meta = Moose::Meta::Class->create_anon_class;
+my $meta = Moose::Meta::Class->create('Banana');
 
-#local $TODO = 'not implemented yet';
+my $warn;
+$SIG{__WARN__} = sub { $warn = "@_" };
 
-eval { $meta->add_attribute('foo') };
-like $@, qr/Attribute \(foo\) has no associated methods/,
+$meta->add_attribute('foo');
+like $warn, qr/Attribute \(foo\) of class Banana has no associated methods/,
   'correct error message';
 
-ok(
-    eval { $meta->add_attribute('bar', is => 'bare'); 1 },
-    'add attribute with no methods',
-) or diag $@;
+$warn = '';
+$meta->add_attribute('bar', is => 'bare');
+is $warn, '', 'add attribute with no methods and is => "bare"';
+
+done_testing;