fix for latest DBIx::Class (deploy)

2014-10-19 13:46:41 +01:00
parent 8d51e69563
commit e72bfa750e
4 changed files with 22 additions and 7 deletions
--- a/Netdisco/bin/netdisco-db-deploy
+++ b/Netdisco/bin/netdisco-db-deploy
@@ -85,7 +85,7 @@ my $schema = schema('netdisco');
 # installs the dbix_class_schema_versions table with version "1"
 # which corresponds to an empty schema
 if (not $schema->get_db_version) {
-    $schema->txn_do(sub { $schema->install(1) });
+    $schema->install(1);
    $schema->storage->disconnect;
 }