is( $foo_moose->moose, 'Foo',
'... got the right value from the Foo::Moose method' );
-ok ! exception {
+is( exception {
Old::Bucket::Nose->meta->make_immutable( debug => 0 );
-},
-'Immutability on Moose class extending Class::MOP class ok';
+}, undef, 'Immutability on Moose class extending Class::MOP class ok' );
-ok ! exception {
+is( exception {
SubClass2->meta->superclasses('MyBase');
-},
-'Can subclass the same non-Moose class twice with different metaclasses';
+}, undef, 'Can subclass the same non-Moose class twice with different metaclasses' );
done_testing;