improve quoting of --params

master
joey 2006-03-13 00:57:37 +00:00
parent 5c734b80df
commit 192544552d
1 changed files with 1 additions and 1 deletions

View File

@ -642,7 +642,7 @@ sub gen_wrapper ($$) { #{{{
push @params, "--cgiurl=$cgiurl" if $cgiurl;
push @params, "--historyurl=$historyurl" if $historyurl;
push @params, "--anonok" if $anonok;
my $params=join(" ", @params);
my $params=join(" ", map { "\'$_\'" } @params);
my $call='';
foreach my $p ($this, $this, @params) {
$call.=qq{"$p", };