nils/gluon
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Allow whitespace and other special characters in generate expressions from arrays

Browse Source
This commit is contained in:
Matthias Schiffer 2014-02-23 06:01:35 +01:00
parent e4bd85bff5
commit 5fb924193d
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
scripts/generate.pl
View File

@ -13,7 +13,7 @@ sub add_config {
add_config($key . '.', $val); add_config($key . '.', $val);
} }
elsif (ref($val) eq 'ARRAY') { elsif (ref($val) eq 'ARRAY') {
$config{'@' . $prefix . $key . '@'} = join ' ', @{$val}; $config{'@' . $prefix . $key . '@'} = join ' ', map {s/'/'\\''/g; "'" . $_ . "'"} @{$val}
} }
unless (ref($val)) { unless (ref($val)) {
$config{'@' . $prefix . $key . '@'} = $val; $config{'@' . $prefix . $key . '@'} = $val;