From: ivan <ivan>
Date: Wed, 20 Jul 2011 13:46:11 +0000 (+0000)
Subject: fix missing banned_pay index
X-Git-Tag: freeside_2_1_3~64
X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=commitdiff_plain;h=652b2d9f68a558d03dbf441fd28ad17e847dff42;hp=f460000a78d4e74881051e1999197ddab3b1b81d

fix missing banned_pay index
---

diff --git a/FS/FS/Schema.pm b/FS/FS/Schema.pm
index 866aa259a..1aa2b69c4 100644
--- a/FS/FS/Schema.pm
+++ b/FS/FS/Schema.pm
@@ -117,6 +117,7 @@ sub dbdef_dist {
     #false laziness w/sub indices in DBIx::DBSchema::DBD (well, sorta)
     #and sub sql_create_table in DBIx::DBSchema::Table (slighty more?)
     my $unique = $tables_hashref->{$tablename}{'unique'};
+    warn "missing index for $tablename\n" unless defined $tables_hashref->{$tablename}{'index'};
     my @index  = @{ $tables_hashref->{$tablename}{'index'} };
 
     # kludge to avoid avoid "BLOB/TEXT column 'statustext' used in key
@@ -2491,7 +2492,7 @@ sub tables_hashref {
       ],
       'primary_key' => 'bannum',
       'unique'      => [],
-      'index '      => [ [ 'payby', 'payinfo' ], [ 'usernum' ], ],
+      'index'       => [ [ 'payby', 'payinfo' ], [ 'usernum' ], ],
     },
 
     'pkg_category' => {