fix syntax error with corrupt data
Just because it's supposed to be an integer or boolean doesn't mean the vlaue really is..master
parent
94c59d3254
commit
f6babf662b
|
@ -28,7 +28,7 @@ sub dumpline ($$$$) { #{{{
|
|||
local $Data::Dumper::Quotekeys=0;
|
||||
|
||||
my $dumpedvalue;
|
||||
if ($type eq 'boolean' || $type eq 'integer') {
|
||||
if (($type eq 'boolean' || $type eq 'integer') && $value=~/^[0-9]+$/) {
|
||||
# avoid quotes
|
||||
$dumpedvalue=$value;
|
||||
}
|
||||
|
|
Loading…
Reference in New Issue