improve quoting of --params
parent
5c734b80df
commit
192544552d
2
ikiwiki
2
ikiwiki
|
@ -642,7 +642,7 @@ sub gen_wrapper ($$) { #{{{
|
||||||
push @params, "--cgiurl=$cgiurl" if $cgiurl;
|
push @params, "--cgiurl=$cgiurl" if $cgiurl;
|
||||||
push @params, "--historyurl=$historyurl" if $historyurl;
|
push @params, "--historyurl=$historyurl" if $historyurl;
|
||||||
push @params, "--anonok" if $anonok;
|
push @params, "--anonok" if $anonok;
|
||||||
my $params=join(" ", @params);
|
my $params=join(" ", map { "\'$_\'" } @params);
|
||||||
my $call='';
|
my $call='';
|
||||||
foreach my $p ($this, $this, @params) {
|
foreach my $p ($this, $this, @params) {
|
||||||
$call.=qq{"$p", };
|
$call.=qq{"$p", };
|
||||||
|
|
Loading…
Reference in New Issue