use strict;
use warnings;
use Test::More tests => 15;
-use Test::Exception;
+use Mouse::Util ':test';
do {
package Class;
is => 'rw',
auto_deref => 1,
);
- } qr/You cannot auto-dereference without specifying a type constraint on attribute any/;
+ } qr/You cannot auto-dereference without specifying a type constraint on attribute \(any\)/;
::throws_ok {
has scalar => (
isa => 'Value',
auto_deref => 1,
);
- } qr/You cannot auto-dereference anything other than a ArrayRef or HashRef on attribute scalar/;
+ } qr/You cannot auto-dereference anything other than a ArrayRef or HashRef on attribute \(scalar\)/;
};
my $obj;