'CREATE UNIQUE NONCLUSTERED INDEX ' .
$self->unique_constraint_name($constraint) .
' ON ' . $self->quote($constraint->table->name) . ' (' .
- join( ', ', $constraint->fields ) . ')' .
+ join( ', ', map $self->quote($_), $constraint->fields ) . ')' .
' WHERE ' . join( ' AND ',
map $self->quote($_->name) . ' IS NOT NULL',
grep { $_->is_nullable } $constraint->fields ) . ';'
return (
'CONSTRAINT ' . $self->enum_constraint_name($field_name) .
' CHECK (' . $self->quote($field_name) .
- ' IN (' . join( ',', map qq('$_'), @$vals ) . '))'
+ ' IN (' . join( ',', map $self->quote_string($_), @$vals ) . '))'
)
}
}
sub drop_tables {
- my ($self, $schema) = shift;
+ my ($self, $schema) = @_;
if ($self->add_drop_table) {
my @tables = sort { $b->order <=> $a->order } $schema->get_tables;