Commit bbb8cf21 authored by Florido Paganelli's avatar Florido Paganelli

strip spaces in getValue and do not delete hash references for bug 3838

parent 76d4e95e
......@@ -503,7 +503,8 @@ sub strip_spaces {
$stripstring =~ s/^\s+|\s+$//g;
my $newkey="$prefix$stripstring";
$jsonconf->{$newkey} = $jsonconf->{$key};
delete $jsonconf->{$key};
# not needed as the reference is copied. But I don't trust it.
#delete $jsonconf->{$key};
}
}
}
......@@ -1043,6 +1044,8 @@ sub getValueOf ($$$){
close $parserout;
}
# remove blank spaces before and after
$value =~ s/^\s+|\s+$//g;
# strip trailing newline
chomp $value;
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment