get table created when Table->new() is called without -create option

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@3838 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
linggao 2009-07-21 03:27:23 +00:00
parent 3ec3088339
commit 5c0eb55659

View File

@ -195,7 +195,8 @@ sub new
$self->{colnames} = \@{$self->{schema}->{cols}};
$self->{descriptions} = \%{$self->{schema}->{descriptions}};
my %otherargs = @_;
my $create = $otherargs{'-create'}; #(scalar(@_) == 1 ? shift : 0);
my $create = 1;
if (exists($otherargs{'-create'}) && ($otherargs{'-create'}==0)) {$create = 0;}
$self->{autocommit} = $otherargs{'-autocommit'};
unless (defined($self->{autocommit}))