t/sqlmaker/sqlite.t

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