t/040_type_constraints/032_throw_error.t

   1 use strict;
   2 use warnings;
   3
   4 use Test::More;
   5
   6 use Moose::Util::TypeConstraints;
   7
   8
   9 eval { Moose::Util::TypeConstraints::create_type_constraint_union() };
  10
  11 like( $@, qr/\QYou must pass in at least 2 type names to make a union/,
  12       'can throw a proper error without Moose being loaded by the caller' );
  13
  14 done_testing;