[freeside-commits] freeside/FS/FS Schema.pm,1.315,1.316

[Ivan,,,]

Update of /home/cvs/cvsroot/freeside/FS/FS
In directory wavetail.420.am:/tmp/cvs-serv25771

Modified Files:
	Schema.pm 
Log Message:
fix missing banned_pay index

Index: Schema.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/Schema.pm,v
retrieving revision 1.315
retrieving revision 1.316
diff -u -w -d -r1.315 -r1.316
--- Schema.pm	15 Jul 2011 21:10:04 -0000	1.315
+++ Schema.pm	20 Jul 2011 13:46:10 -0000	1.316
@@ -117,6 +117,7 @@
     #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