Commit | Line | Data |
---|---|---|
c0329273 | 1 | BEGIN { do "./t/lib/ANFANG.pm" or die ( $@ || $! ) } |
2 | ||
4f52479b | 3 | use strict; |
4 | use warnings; | |
5 | ||
6 | use Test::More; | |
7 | use Test::Exception; | |
8 | ||
4f52479b | 9 | use DBICTest; |
10 | ||
11 | { | |
12 | package DBICTest::Foo; | |
13 | use base "DBIx::Class::Core"; | |
14 | } | |
15 | ||
16 | throws_ok { DBICTest::Foo->new("urgh") } qr/must be a hashref/; | |
17 | ||
18 | done_testing; |