Commit | Line | Data |
---|---|---|
551e711a | 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; |