From 16b8111ea29e6002dec8e9b4bc3fd75fb25f00e1 Mon Sep 17 00:00:00 2001 From: lissav Date: Sun, 6 Feb 2011 11:35:12 +0000 Subject: [PATCH] fix for defect 3168861 git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@8790 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd --- perl-xCAT/xCAT/Table.pm | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) 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