Enclose header expressions (#1122)

This commit is contained in:
Xavier Guimard 2016-12-20 09:38:49 +00:00
parent 32d09a2f0e
commit 691d076000

View File

@ -336,7 +336,7 @@ sub headersInit {
my $sub;
foreach ( keys %headers ) {
my $val = $class->substitute( $headers{$_} );
$sub .= "'$_' => $val,";
$sub .= "('$_' => $val),";
}
unless ( $class->tsv->{forgeHeaders}->{$vhost} =