#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
],
'primary_key' => 'bannum',
'unique' => [],
- 'index ' => [ [ 'payby', 'payinfo' ], [ 'usernum' ], ],
+ 'index' => [ [ 'payby', 'payinfo' ], [ 'usernum' ], ],
},
'pkg_category' => {
'index' => [], #recnum
},
- 'svc_port' => {
- 'columns' => [
- 'svcnum', 'int', '', '', '', '',
- ],
- 'primary_key' => 'svcnum',
- 'unique' => [],
- 'index' => [], #recnum
- },
-
'areacode' => {
'columns' => [
'areanum', 'serial', '', '', '', '',