Fixed spelling of "indices" in various files, finished adding all of Tim

[dbsrgits/SQL-Translator.git] / t / 06xsv.t

diff --git a/t/06xsv.t b/t/06xsv.t
index af5d109..39fc6fe 100644 (file)
--- a/t/06xsv.t
+++ b/t/06xsv.t
@@ -31,13 +31,13 @@ print qq(ok 2 # has a key named "table1"\n);
 
 # $val->{'table1'} should have a single index (since we haven't
 # defined an index, but have defined a primary key)
-my $indeces = $val->{'table1'}->{'indeces'};
-print "not " unless (scalar @{$indeces} == 1);
+my $indices = $val->{'table1'}->{'indices'};
+print "not " unless (scalar @{$indices} == 1);
 print "ok 3 # correct index number\n";
 
-print "not " unless ($indeces->[0]->{'type'} eq 'primary_key');
+print "not " unless ($indices->[0]->{'type'} eq 'primary_key');
 print "ok 4 # correct index type\n";
-print "not " unless ($indeces->[0]->{'fields'}->[0] eq 'One');
+print "not " unless ($indices->[0]->{'fields'}->[0] eq 'One');
 print "ok 5 # correct index name\n";
 
 # $val->{'table1'} should have two fields, id and a_sessionn