t/schema/anon.t

   1 use strict;
   2 use warnings;
   3 use Test::More;
   4 use Test::Exception;
   5
   6 use lib qw(t/lib);
   7 use DBICTest;
   8
   9 lives_ok (sub {
  10   DBICTest->init_schema()->resultset('Artist')->find({artistid => 1 })->update({name => 'anon test'});
  11 }, 'Schema object not lost in chaining');
  12
  13 done_testing;