'undef =>' isn't what one would want
[dbsrgits/DBIx-Class-Historic.git] / t / 20setuperrors.t
CommitLineData
d88ecca6 1use warnings;
2use strict;
e7513319 3
d88ecca6 4use Test::More;
5use Test::Exception;
e7513319 6
8d6b1478 7use lib 't/lib';
8use DBICTest;
9
d88ecca6 10throws_ok (
11 sub {
12 package BuggyTable;
13 use base 'DBIx::Class::Core';
e7513319 14
d88ecca6 15 __PACKAGE__->table('buggy_table');
6ebac5d6 16 __PACKAGE__->columns( qw/this doesnt work as expected/ );
d88ecca6 17 },
18 qr/\bcolumns\(\) is a read-only/,
19 'columns() error when apparently misused',
20);
e7513319 21
d88ecca6 22done_testing;