t/resultsource/bare_resultclass_exception.t

   1 use strict;
   2 use warnings;
   3
   4 use Test::More;
   5 use Test::Exception;
   6
   7 use lib 't/lib';
   8 use DBICTest;
   9
  10 {
  11   package DBICTest::Foo;
  12   use base "DBIx::Class::Core";
  13 }
  14
  15 throws_ok { DBICTest::Foo->new("urgh") } qr/must be a hashref/;
  16
  17 done_testing;