WIP Tk panner widget

[ypp-sc-tools.main.git] / yarrg / db-idempotent-populate

diff --git a/yarrg/db-idempotent-populate b/yarrg/db-idempotent-populate
index 691f77ba8af294d0f8e47e3463137df30d2205f5..bb0448ce478389c1c030220514c1cdabe648f588 100755 (executable)
--- a/yarrg/db-idempotent-populate
+++ b/yarrg/db-idempotent-populate
@@ -477,7 +477,7 @@ END
     ;
 }
 
-db_check_referential_integrity();
+db_check_referential_integrity(1);
 
 #---------- compact IDs ----------
 
@@ -539,7 +539,7 @@ END
 
 #---------- put it all into effect ----------
 
-db_chkcommit();
+db_chkcommit(1);
 
 {
     local $dbh->{AutoCommit} = 1;