package Mouse::TestClass;
use Mouse;
- extends 'Anti::Mouse';
+ extends 'Unsweetened';
sub mouse { 1 }
};
isa_ok($child => 'Class');
isa_ok($child => 'Mouse::Object');
-can_ok('Mouse::TestClass' => qw(mouse antimouse));
+can_ok('Mouse::TestClass' => qw(mouse unsweetened));
eval "
package Child;
throws_ok { Mouse::load_class('') } qr/Invalid class name \(\)/;
throws_ok { Mouse::load_class(\"foo") } qr/Invalid class name \(SCALAR\(\w+\)\)/;
-ok(Mouse::load_class('Anti::Mouse'));
-can_ok('Anti::Mouse' => 'antimouse');
+ok(Mouse::load_class('Unsweetened'));
+can_ok('Unsweetened' => 'unsweetened');
do {
package Class;
} qr/Can't locate /;
throws_ok {
- Mouse::load_class('Anti::MouseError');
+ Mouse::load_class('SyntaxError');
} qr/Missing right curly/;