trAvis - MANAGER
Edit File: 002_require_superclasses.t
#!/usr/bin/perl use strict; use warnings; use lib 't/lib', 'lib'; use Test::More tests => 4; use Test::Exception; { package Bar; use Mouse; ::lives_ok { extends 'Foo' } 'loaded Foo superclass correctly'; } { package Baz; use Mouse; ::lives_ok { extends 'Bar' } 'loaded (inline) Bar superclass correctly'; } { package Foo::Bar; use Mouse; ::lives_ok { extends 'Foo', 'Bar' } 'loaded Foo and (inline) Bar superclass correctly'; } { package Bling; use Mouse; ::throws_ok { extends 'No::Class' } qr{Can't locate No/Class\.pm in \@INC}, 'correct error when superclass could not be found'; }