BEGIN {
is(
- $INC{'Class/Tiny/Object.pm'}, undef,
+ $INC{'Moo/Object.pm'}, undef,
'Object.pm not loaded if not required'
);
}
[ @MyClass3::ISA ], [ 'MyClass2' ], 'extends sets superclass'
);
+{ package WhatTheFlyingFornication; sub wtff {} }
+
{
package MyClass4;