X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=bin%2Fvalidator_test.pl;h=6c1f326be91f91cc1eb164ce0c489d4f905596a4;hb=407bc860dcd264edba2430a506207874a0247257;hp=92893ba027dd2b0b241fc0282af45a7fc13a3453;hpb=e2158c408a30ce43e277e68d586130a89126c733;p=dbsrgits%2FSQL-Translator.git

diff --git a/bin/validator_test.pl b/bin/validator_test.pl
index 92893ba..6c1f326 100755
--- a/bin/validator_test.pl
+++ b/bin/validator_test.pl
@@ -4,7 +4,7 @@ use SQL::Translator::Validator;
 my $data = {
     random => {
         type => undef,
-        indeces => [ ],
+        indices => [ ],
         fields => {
             id => {
                 name => "id",
@@ -27,9 +27,9 @@ my $data = {
     },
     session => {
         type => "HEAP",
-        indeces => [
+        indices => [
             {
-                name => "main_idx",
+                name => undef,
                 primary_key => 1,
                 fields => [ "id" ],
             }
@@ -54,12 +54,5 @@ my $data = {
     }
 };
 
-use SQL::Translator;
-
-my $tr = SQL::Translator->new(parser => "MySQL");
-
-$data = $tr->translate("t/data/mysql/BGEP-RE-create.sql");
-
 my @r = validate($data);
-
 printf "%s%s", $r[1], $r[0]? "" : "\n";