Changeset 2243 for trunk/LATMOS-Accounts/bin/la-sql-upgrade

Timestamp:

05/21/19 17:30:15 (5 years ago)

Author:

nanardon

Message:

Improve schema upgrade procedure

File:

• trunk/LATMOS-Accounts/bin/la-sql-upgrade (modified) (1 diff)

trunk/LATMOS-Accounts/bin/la-sql-upgrade

@@ -45 +45 @@
 $| = 1; # autoflush
 
+if ($nocommit) {
+    $ENV{LA_NO_COMMIT} = 1;
+}
+
 my $LA = LATMOS::Accounts->new($config, noacl => 1);
-my $labase = $LA->base($base);
+my $labase = $LA->_load_base($base);
 $labase->unexported(1);
-
-require LATMOS::Accounts::Bases::Sql::upgrade;
 
 $labase->SchemaUpgrade() or die "An error occur";
 
-if ($nocommit) {
-    $labase->rollback;
-} else {
-    $labase->commit;
-}
 print "Process terminated successfully\n";