Commit | Line | Data |
---|---|---|
c9d5a251 | 1 | use strict; |
2 | use warnings; | |
3 | ||
4 | use Test::More tests => 1; | |
5 | ||
6 | use lib qw(t/lib); | |
7 | eval { | |
8 | package DBICErrorTest::Schema; | |
9 | ||
10 | use base 'DBIx::Class::Schema'; | |
11 | __PACKAGE__->load_classes('SourceWithError'); | |
12 | }; | |
13 | ||
14 | # Make sure the errors in components of resultset classes are reported right. | |
15 | like($@, qr!syntax error at t/lib/DBICErrorTest/SyntaxError.pm!); |