diff options
Diffstat (limited to 'bin/db_legacy')
| -rwxr-xr-x | bin/db_legacy | 26 |
1 files changed, 12 insertions, 14 deletions
diff --git a/bin/db_legacy b/bin/db_legacy index 3206d33..705b04a 100755 --- a/bin/db_legacy +++ b/bin/db_legacy @@ -11,22 +11,20 @@ use ASM::DB; use Getopt::Long; use DBIx::Class::DeploymentHandler; -GetOptions( - 'config|c=s' => \$::cset, -); -if ($::cset eq '') { $::cset = 'config-default'; } -else { $::cset = "config-$::cset"; } +GetOptions( 'config|c=s' => \$::cset ); +if ( $::cset eq '' ) { $::cset = 'config-default'; } +else { $::cset = "config-$::cset"; } ASM::Config->readConfig(); -my $schema = ASM::DB->connect($::mysql->{dsn}, $::mysql->{user}, $::mysql->{pass}); +my $schema = ASM::DB->connect( $::mysql->{dsn}, $::mysql->{user}, $::mysql->{pass} ); -my $dh = DBIx::Class::DeploymentHandler->new({ - schema => $schema, - schema_version => '' . $schema->schema_version, - sql_translator_args => { add_drop_table => 0, quote_identifiers => 1 }, - databases => [], - ignore_ddl => 1, - }); +my $dh = DBIx::Class::DeploymentHandler->new( { + schema => $schema, + schema_version => '' . $schema->schema_version, + sql_translator_args => { add_drop_table => 0, quote_identifiers => 1 }, + databases => [], + ignore_ddl => 1, +} ); $dh->install_version_storage; -$dh->add_database_version({ version => 1 }); +$dh->add_database_version( { version => 1 } ); |
