[dbsrgits/DBIx-Class.git] / t / sqlmaker / sqlite.t

use strict;
use warnings;

use Test::More;
use lib qw(t/lib);
use DBICTest ':DiffSQL';

my $schema = DBICTest->init_schema;

is_same_sql_bind(
  $schema->resultset('Artist')->search ({}, {for => 'update'})->as_query,
  '(SELECT me.artistid, me.name, me.rank, me.charfield FROM artist me)', [],
);

done_testing;
Commit	Line	Data
09cedb88	1	use strict;
	2	use warnings;
	3
	4	use Test::More;
	5	use lib qw(t/lib);
a5a7bb73	6	use DBICTest ':DiffSQL';
09cedb88	7
	8	my $schema = DBICTest->init_schema;
	9
	10	is_same_sql_bind(
dbc2b0e8	11	$schema->resultset('Artist')->search ({}, {for => 'update'})->as_query,
	12	'(SELECT me.artistid, me.name, me.rank, me.charfield FROM artist me)', [],
	13	);
09cedb88	14
09cedb88	15	done_testing;