#!/usr/bin/perl
use vars qw(@modules);
BEGIN {
@modules = qw(
Brick
Brick::Composers
Mock::Bucket
Mock::FooValidator
Mock::BarValidator
);
}
use Test::More tests => 3;
use strict;
my @modules = qw(
Brick::Composers
);
foreach my $module ( @modules )
{
print "BAIL OUT!" unless use_ok( $module );
}
# API shims
ok( defined &Brick::Bucket::add_to_pool );
ok( ! eval { Brick::Bucket->add_to_pool } );