Allow single quotes in previously committed feature

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@1105 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
jbjohnso 2008-04-16 19:49:53 +00:00
parent 62996cf88e
commit c58e662df0

View File

@ -944,7 +944,7 @@ sub getNodeAttribs
{
#my $next = $comps[0];
if ($curr =~ /^[\{\}()\-\+\/\%\*\$\d]+$/ or $curr =~ /^\(sprintf\(["%\dcsduoxefg]+,\s*[\{\}()\-\+\/\%\*\$\d]+\)\)$/ )
if ($curr =~ /^[\{\}()\-\+\/\%\*\$\d]+$/ or $curr =~ /^\(sprintf\(["'%\dcsduoxefg]+,\s*[\{\}()\-\+\/\%\*\$\d]+\)\)$/ )
{
use integer
; #We only allow integer operations, they are the ones that make sense for the application