summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorJesse Luehrs <doy@tozt.net>2009-12-19 14:19:38 -0600
committerJesse Luehrs <doy@tozt.net>2009-12-19 14:19:38 -0600
commitce332af50f68223a3eb2224a68a648b836d9f6e5 (patch)
treea393988bb828dbf0e06dab521ff18ccf9080e3bf
parentdbe4c918ce9e4678550c0704310d582889196f7d (diff)
downloadmoosex-module-refresh-ce332af50f68223a3eb2224a68a648b836d9f6e5.tar.gz
moosex-module-refresh-ce332af50f68223a3eb2224a68a648b836d9f6e5.zip
a couple more tests
-rw-r--r--t/002-moose.t4
1 files changed, 3 insertions, 1 deletions
diff --git a/t/002-moose.t b/t/002-moose.t
index 9141eda..8f251c9 100644
--- a/t/002-moose.t
+++ b/t/002-moose.t
@@ -1,7 +1,7 @@
#!/usr/bin/env perl
use strict;
use warnings;
-use Test::More tests => 14;
+use Test::More tests => 16;
use MooseX::Module::Refresh;
@@ -52,6 +52,8 @@ is($foobar->baz, 'FOO', "We got the right new result");
is($foobar->foo, 1, "We got the right new result");
ok(!$foobar->can('bar'), "the bar method was removed");
ok(!$foobar->can('clear_foo'), "the clear_foo method was removed");
+ok(FooBar->meta->has_attribute('baz'), "the baz attribute exists");
+ok(!FooBar->meta->has_attribute('foo'), "the foo attribute was removed");
# After a refresh, did we blow away our non-file-based comp?
can_ok('FooBar', 'not_in_foobarpm');