diff --git a/perl-xCAT/xCAT/Table.pm b/perl-xCAT/xCAT/Table.pm index 63ced6a9c..39404a578 100644 --- a/perl-xCAT/xCAT/Table.pm +++ b/perl-xCAT/xCAT/Table.pm @@ -843,9 +843,10 @@ sub new buildcreatestmt($self->{tabname}, $xCAT::Schema::tabspec{$self->{tabname}}, $xcatcfg); - $self->{dbh}->do($str); - $self->{dbh}->commit; # commit the create - + $self->{dbh}->do($str); + if (!$self->{dbh}->{AutoCommit}) { + $self->{dbh}->commit; # commit the create + } } } # end Generic DBI