diff options
Diffstat (limited to 'bin/add-history-records.pl')
-rwxr-xr-x | bin/add-history-records.pl | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/bin/add-history-records.pl b/bin/add-history-records.pl index 18c473d46..722de47f1 100755 --- a/bin/add-history-records.pl +++ b/bin/add-history-records.pl @@ -40,9 +40,10 @@ foreach my $table (@tables) { unless ($h_rec) { my $h_insert_rec = $rec->_h_statement('insert', 1); - #print $h_insert_rec . "\n"; + print $h_insert_rec . "\n"; $dbh->do($h_insert_rec); die $dbh->errstr if $dbh->err; + $dbh->commit or die $dbh->errstr; $cnt++; } |