From: Ash Berlin Date: Sat, 12 Jan 2008 13:47:18 +0000 (+0000) Subject: Fix after typo in merge X-Git-Tag: v0.11008~348^2~5 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=907f8cea39e30872500a9cf3b9059a1d7bf4550f;p=dbsrgits%2FSQL-Translator.git Fix after typo in merge --- diff --git a/lib/SQL/Translator/Producer/SQLite.pm b/lib/SQL/Translator/Producer/SQLite.pm index 75f1d63..dca2aea 100644 --- a/lib/SQL/Translator/Producer/SQLite.pm +++ b/lib/SQL/Translator/Producer/SQLite.pm @@ -287,8 +287,8 @@ sub create_index (my $index_table_name = $index->table->name) =~ s/^.+?\.//; # table name may not specify schema warn "removing schema name from '" . $index->table->name . "' to make '$index_table_name'\n" if $WARN; my $index_def = - "CREATE ${type]INDEX $name on " . $index_table_name . - ' (' . join( ', ', @fields ) . ');'; + "CREATE ${type}INDEX $name ON " . $index_table_name . + ' (' . join( ', ', @fields ) . ')'; return $index_def; } @@ -304,8 +304,8 @@ sub create_constraint warn "removing schema name from '" . $c->table->name . "' to make '$index_table_name'\n" if $WARN; my $c_def = - "CREATE UNIQUE INDEX $name on " . $index_table_name . - ' (' . join( ', ', @fields ) . ');'; + "CREATE UNIQUE INDEX $name ON " . $index_table_name . + ' (' . join( ', ', @fields ) . ')'; return $c_def; }