# avoid quotes
$dumpedvalue=$value;
}
- elsif (ref $value eq 'ARRAY' && @$value && ! grep { /[^-A-Za-z0-9_]/ } @$value) {
+ elsif (ref $value eq 'ARRAY' && @$value && ! grep { /[^\S]/ } @$value) {
# dump simple array as qw{}
$dumpedvalue="[qw{".join(" ", @$value)."}]";
}
my @ret;
# disable logging to syslog while dumping
- $config{syslog}=0;
+ $config{syslog}=undef;
push @ret, dumpvalues(\%setup, IkiWiki::getsetup());
foreach my $pair (IkiWiki::Setup::getsetup()) {