use SQL::Translator::Schema::Constants;
use Storable 'dclone';
-plan tests => 8;
+plan tests => 9;
use_ok('SQL::Translator::Diff') or die "Cannot continue\n";
-my $tr = SQL::Translator->new;
+my $tr = SQL::Translator->new;
my ( $source_schema, $target_schema, $parsed_sql_schema ) = map {
my $t = SQL::Translator->new;
} (qw( create1.yml create2.yml ));
# Test for differences
-my $out = SQL::Translator::Diff::schema_diff( $source_schema, 'MySQL', $target_schema, 'MySQL', { no_batch_alters => 1, producer_options => { quote_table_names => 0 } } );
+my @out = SQL::Translator::Diff::schema_diff(
+ $source_schema, 'MySQL',
+ $target_schema, 'MySQL',
+ {
+ no_batch_alters => 1,
+ producer_args => { quote_table_names => 0 }
+ }
+);
+
+ok( @out, 'Got a list' );
+
+my $out = join('', @out);
+
eq_or_diff($out, <<'## END OF DIFF', "Diff as expected");
-- Convert schema 'create1.yml' to 'create2.yml':;
ALTER TABLE new_name ADD COLUMN new_field integer;
-ALTER TABLE person ADD COLUMN is_rock_star tinyint(4) DEFAULT '1';
+ALTER TABLE person ADD COLUMN is_rock_star tinyint(4) DEFAULT 1;
ALTER TABLE person CHANGE COLUMN person_id person_id integer(11) NOT NULL auto_increment;
ALTER TABLE person CHANGE COLUMN name name varchar(20) NOT NULL;
-ALTER TABLE person CHANGE COLUMN age age integer(11) DEFAULT '18';
+ALTER TABLE person CHANGE COLUMN age age integer(11) DEFAULT 18;
-ALTER TABLE person CHANGE COLUMN iq iq integer(11) DEFAULT '0';
+ALTER TABLE person CHANGE COLUMN iq iq integer(11) DEFAULT 0;
ALTER TABLE person CHANGE COLUMN description physical_description text;
$out = SQL::Translator::Diff::schema_diff($source_schema, 'MySQL', $target_schema, 'MySQL',
{ ignore_index_names => 1,
ignore_constraint_names => 1,
- producer_options => { quote_table_names => 0 },
+ producer_args => { quote_table_names => 0 },
});
eq_or_diff($out, <<'## END OF DIFF', "Diff as expected");
ADD COLUMN new_field integer;
ALTER TABLE person DROP INDEX UC_age_name,
- ADD COLUMN is_rock_star tinyint(4) DEFAULT '1',
+ ADD COLUMN is_rock_star tinyint(4) DEFAULT 1,
CHANGE COLUMN person_id person_id integer(11) NOT NULL auto_increment,
CHANGE COLUMN name name varchar(20) NOT NULL,
- CHANGE COLUMN age age integer(11) DEFAULT '18',
- CHANGE COLUMN iq iq integer(11) DEFAULT '0',
+ CHANGE COLUMN age age integer(11) DEFAULT 18,
+ CHANGE COLUMN iq iq integer(11) DEFAULT 0,
CHANGE COLUMN description physical_description text,
ADD UNIQUE UC_person_id (person_id),
ADD UNIQUE UC_age_name (age, name),
my $field = $target_schema->get_table('employee')->get_field('employee_id');
$field->data_type('integer');
$field->size(0);
- $out = SQL::Translator::Diff::schema_diff($schema, 'MySQL', $target_schema, 'MySQL', { producer_options => { quote_table_names => 0 } } );
+ $out = SQL::Translator::Diff::schema_diff($schema, 'MySQL', $target_schema, 'MySQL', { producer_args => { quote_table_names => 0 } } );
eq_or_diff($out, <<'## END OF DIFF', "No differences found");
-- Convert schema 'create.sql' to 'create2.yml':;
ALTER TABLE person DROP INDEX UC_age_name,
DROP INDEX u_name,
- ADD COLUMN is_rock_star tinyint(4) DEFAULT '1',
+ ADD COLUMN is_rock_star tinyint(4) DEFAULT 1,
CHANGE COLUMN person_id person_id integer(11) NOT NULL auto_increment,
CHANGE COLUMN name name varchar(20) NOT NULL,
- CHANGE COLUMN age age integer(11) DEFAULT '18',
- CHANGE COLUMN iq iq integer(11) DEFAULT '0',
+ CHANGE COLUMN age age integer(11) DEFAULT 18,
+ CHANGE COLUMN iq iq integer(11) DEFAULT 0,
CHANGE COLUMN description physical_description text,
ADD UNIQUE INDEX unique_name (name),
ADD UNIQUE UC_person_id (person_id),
# Test quoting works too.
$out = SQL::Translator::Diff::schema_diff($s1, 'MySQL', $s2, 'MySQL',
- { producer_options => { quote_table_names => '`' } }
+ { producer_args => { quote_table_names => '`' } }
);
eq_or_diff($out, <<'## END OF DIFF', "Quoting can be turned on");
-- Convert schema 'Schema 3' to 'Schema 4':;