From a1e9afb92d64ca99272c9c139bc8fd2bc2be23b7 Mon Sep 17 00:00:00 2001
From: jbjohnso <jbjohnso@8638fb3e-16cb-4fca-ae20-7b5d299a9bcd>
Date: Mon, 6 Dec 2010 16:42:34 +0000
Subject: [PATCH] -Fix autocommit defaulting for realautocommit

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@8330 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
---
 perl-xCAT/xCAT/Table.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/perl-xCAT/xCAT/Table.pm b/perl-xCAT/xCAT/Table.pm
index 68d8b02ae..05988e09b 100644
--- a/perl-xCAT/xCAT/Table.pm
+++ b/perl-xCAT/xCAT/Table.pm
@@ -687,11 +687,11 @@ sub new
     my $create = 1;
     if (exists($otherargs{'-create'}) && ($otherargs{'-create'}==0)) {$create = 0;}
     $self->{autocommit} = $otherargs{'-autocommit'};
-    $self->{realautocommit} = $self->{autocommit}; #Assume we let the DB do the work, i.e. the autocommit is either not used or is not emulated by Table.pm
     unless (defined($self->{autocommit}))
     {
         $self->{autocommit} = 1;
     }
+    $self->{realautocommit} = $self->{autocommit}; #Assume we let the DB do the work, i.e. the autocommit is either not used or is not emulated by Table.pm
     my $class = ref($proto) || $proto;
     if ($dbworkerpid) {
         my $request = {