[dbsrgits/DBIx-Class.git] / t / schema / anon.t

BEGIN { do "./t/lib/ANFANG.pm" or die ( $@ || $! ) }

use strict;
use warnings;
use Test::More;
use Test::Exception;


use DBICTest;

lives_ok (sub {
  DBICTest->init_schema()->resultset('Artist')->find({artistid => 1 })->update({name => 'anon test'});
}, 'Schema object not lost in chaining');

done_testing;
Commit	Line	Data
c0329273	1	BEGIN { do "./t/lib/ANFANG.pm" or die ( $@ \|\| $! ) }
c0329273	2
551e711a	3	use strict;
	4	use warnings;
	5	use Test::More;
	6	use Test::Exception;
	7
c0329273	8
551e711a	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;