The Perl and Raku Conference 2025: Greenville, South Carolina - June 27-29 Learn more

#!perl
BEGIN {
unless ($ENV{RELEASE_TESTING}) {
require Test::More;
Test::More::plan(skip_all => 'these tests are for release candidate testing');
}
}
#
# Tests that things work ok without MooseX::Traits installed
#
use strict;
use Test::More tests => 2;
our $mask;
BEGIN { $mask = new Module::Mask ('MooseX::Traits') }
use_ok('Server::Control');
throws_ok { Server::Control->new_with_traits() } qr/MooseX::Traits could not be loaded/;