fix quoting

This commit is contained in:
Matthew Hodgson 2017-05-27 17:42:58 +01:00
parent c61ca42261
commit 1305fd619e

View file

@ -70,6 +70,8 @@ if ($_ =~ m/^(\s+)"(.*?)"(: *)"(.*?)"(,?)$/) {
}
if ($sub) {
$src =~ s/"/\\"/g;
$dst =~ s/"/\\"/g;
print qq($indent"$src"$colon"$dst"$comma\n);
last;
}