diff options
Diffstat (limited to 'bin/create-history-tables')
| -rwxr-xr-x | bin/create-history-tables | 13 |
1 files changed, 2 insertions, 11 deletions
diff --git a/bin/create-history-tables b/bin/create-history-tables index 39248bf3f..c610e70cf 100755 --- a/bin/create-history-tables +++ b/bin/create-history-tables @@ -2,7 +2,7 @@ use strict; use DBI; -use DBIx::DBSchema 0.21; +use DBIx::DBSchema 0.20; use DBIx::DBSchema::Table; use DBIx::DBSchema::Column; use DBIx::DBSchema::ColGroup::Unique; @@ -65,16 +65,7 @@ foreach my $table ( @tables ) { 'default' => '', 'local' => '', } ), - map { - my $column = $tableobj->column($_); - $column->type('int') - if $column->type eq 'serial'; - $column->default('') - if $column->default =~ /^nextval\(/i; - ( my $local = $column->local ) =~ s/AUTO_INCREMENT//i; - $column->local($local); - $column; - } $tableobj->columns + map { $tableobj->column($_) } $tableobj->columns ], } ); foreach my $statement ( $h_tableobj->sql_create_table($dbh) ) { |