8 use lib "$FindBin::Bin/lib";
12 use_ok('MyModuleNoBase');
13 is(MyModuleNoBase->new->message, " MyModuleNoBase", "initial message matches");
15 sub { MyModuleNoBase->load_components('+MyModule::Plugin::Foo') },
16 'explicit load_components does not throw',
18 is(MyModuleNoBase->new->message, "Foo MyModuleNoBase", "component works");
21 sub { MyModuleNoBase->load_components('ClassC3ComponentFooThatShouldntExist') },
22 qr/Can't locate object method "component_base_class"/,
23 'non-explicit component specification fails without component_base_class()',
27 sub { MyModuleNoBase->load_optional_components('ClassC3ComponentFooThatShouldntExist') },
28 qr/Can't locate object method "component_base_class"/,
29 'non-explicit component specification fails without component_base_class()',
33 sub { MyModuleNoBase->load_optional_components('+ClassC3ComponentFooThatShouldntExist') },
34 'explicit optional component specification does not throw',