X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FSQL%2FTranslator%2FParser%2FDBI.pm;h=43dd6572c4d9f75588f03da2fbc0ae97c0b4ba1b;hb=e283ffd7efdf75de364f338d7ceb67ecc00d3395;hp=35f0a36601e798e21afa72fb17f7a7001f57457f;hpb=8e50a529fb0cf26456245e1d40b06dbb0d2bcf50;p=dbsrgits%2FSQL-Translator-2.0-ish.git

diff --git a/lib/SQL/Translator/Parser/DBI.pm b/lib/SQL/Translator/Parser/DBI.pm
index 35f0a36..43dd657 100644
--- a/lib/SQL/Translator/Parser/DBI.pm
+++ b/lib/SQL/Translator/Parser/DBI.pm
@@ -150,6 +150,7 @@ sub _add_indexes {
         $index_type = $index_col->{NON_UNIQUE} ? 'NORMAL' : 'UNIQUE';
         push @index_cols, $index_col->{COLUMN_NAME};
     }
+    return if $table->exists_index($index_name);
     my $index = Index->new({ name => $index_name, type => $index_type });
     $index->add_column($table->get_column($_)) for @index_cols;
     $table->add_index($index);