From 8b92d602bb81f1ac92b52f95d0c48b17d2fddb0d Mon Sep 17 00:00:00 2001 From: lissav Date: Tue, 11 Jan 2011 15:59:48 +0000 Subject: [PATCH] update setAttribsWhere with delimitcol git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@8609 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd --- perl-xCAT/xCAT/Table.pm | 9 +++------ 1 file changed, 3 insertions(+), 6 deletions(-) diff --git a/perl-xCAT/xCAT/Table.pm b/perl-xCAT/xCAT/Table.pm index 894b386f3..68b6287df 100644 --- a/perl-xCAT/xCAT/Table.pm +++ b/perl-xCAT/xCAT/Table.pm @@ -1738,15 +1738,12 @@ sub setAttribsWhere $query->finish(); - my $xcatcfg =get_xcatcfg(); #update the rows for my $col (keys %$elems) { - if (($xcatcfg =~ /^DB2:/) || ($xcatcfg =~ /^Pg:/)) { - $cols = $cols . "\"$col\"" . " = ?,"; - } else { - $cols = $cols . $col . " = ?,"; - } + # delimit the columns of the table + my $delimitedcol = &delimitcol($col); + $cols = $cols . $delimitedcol . " = ?,"; push @bind, (($$elems{$col} =~ /NULL/) ? undef: $$elems{$col}); } chop($cols);