projects
/
dbsrgits/DBIx-Class.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
18b04b58b94679708bea6b5a2eff5598179cac5f
[dbsrgits/DBIx-Class.git]
/
t
/
schema
/
anon.t
1
BEGIN { do "./t/lib/ANFANG.pm" or die ( $@ || $! ) }
2
3
use strict;
4
use warnings;
5
use Test::More;
6
use Test::Exception;
7
8
9
use DBICTest;
10
11
lives_ok (sub {
12
DBICTest->init_schema()->resultset('Artist')->find({artistid => 1 })->update({name => 'anon test'});
13
}, 'Schema object not lost in chaining');
14
15
done_testing;