Commit 691d0760 authored by Yadd's avatar Yadd

Enclose header expressions (#1122)

parent 32d09a2f
...@@ -336,7 +336,7 @@ sub headersInit { ...@@ -336,7 +336,7 @@ sub headersInit {
my $sub; my $sub;
foreach ( keys %headers ) { foreach ( keys %headers ) {
my $val = $class->substitute( $headers{$_} ); my $val = $class->substitute( $headers{$_} );
$sub .= "'$_' => $val,"; $sub .= "('$_' => $val),";
} }
unless ( $class->tsv->{forgeHeaders}->{$vhost} = unless ( $class->tsv->{forgeHeaders}->{$vhost} =
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment