Refactor ::DBIHacks::_extract_fixed_condition_columns (sequel to 8d005ad9)
[dbsrgits/DBIx-Class.git] / t / 101source.t
1 use warnings;
2 use strict;
3
4 use Test::More;
5 use Test::Exception;
6
7 use lib qw(t/lib);
8 use DBICTest;
9
10 my $schema = DBICTest->init_schema;
11
12 throws_ok {$schema->source()} qr/\Qsource() expects a source name/, 'Empty args for source caught';
13
14 done_testing();