fix passing args to a code execute helper (gphat++)
[gitmo/Moose.git] / t / 010_basics / 017_error_handling.t
CommitLineData
3ce51439 1#!/usr/bin/perl
2
3use strict;
4use warnings;
5
a62dcd43 6use Test::More tests => 3;
3ce51439 7use Test::Exception;
8
9# This tests the error handling in Moose::Object only
10
11{
12 package Foo;
13 use Moose;
14}
15
16throws_ok { Foo->new('bad') } qr/^\QSingle parameters to new() must be a HASH ref/,
17 'A single non-hashref arg to a constructor throws an error';
a62dcd43 18throws_ok { Foo->new(undef) } qr/^\QSingle parameters to new() must be a HASH ref/,
19 'A single non-hashref arg to a constructor throws an error';
3ce51439 20
21throws_ok { Foo->does() } qr/^\QYou much supply a role name to does()/,
22 'Cannot call does() without a role name';