1 files changed, 22 insertions, 0 deletions
diff --git a/t/attributes/attribute_without_any_methods.t b/t/attributes/attribute_without_any_methods.t
new file mode 100644
index 0000000..f1310fb
--- /dev/null
+++ b/t/attributes/attribute_without_any_methods.t
@@ -0,0 +1,22 @@
+use strict;
+use warnings;
+
+use Test::More;
+
+use Moose ();
+use Moose::Meta::Class;
+
+my $meta = Moose::Meta::Class->create('Banana');
+
+my $warn;
+$SIG{__WARN__} = sub { $warn = "@_" };
+
+$meta->add_attribute('foo');
+like $warn, qr/Attribute \(foo\) of class Banana has no associated methods/,
+  'correct error message';
+
+$warn = '';
+$meta->add_attribute('bar', is => 'bare');
+is $warn, '', 'add attribute with no methods and is => "bare"';
+
+done_testing;