Origin header should be preserved in http requests made via OpenURL code path.

third_party/WebKit/LayoutTests/http/tests/navigation/resources/form-target.pl

Index: third_party/WebKit/LayoutTests/http/tests/navigation/resources/form-target.pl
diff --git a/third_party/WebKit/LayoutTests/http/tests/navigation/resources/form-target.pl b/third_party/WebKit/LayoutTests/http/tests/navigation/resources/form-target.pl
index c07187d0ea0ed920b2201166b8e1b3b3227c8f83..17ccd01f360d9ba7d2132d235996c95ec9cdaa3f 100755
--- a/third_party/WebKit/LayoutTests/http/tests/navigation/resources/form-target.pl
+++ b/third_party/WebKit/LayoutTests/http/tests/navigation/resources/form-target.pl
@@ -24,6 +24,22 @@ foreach $paramName (@paramNames)
     print "<li>" . $paramName . " = " . $query->param($paramName) . "</li>"
 }
 
+print <<HEADER2;
+</ul>
+<p>Http headers:</p>
+<ul>
+HEADER2
+
+my %headers = map { $_ => $query->http($_) } $query->http();
+for my $header ( sort (keys %headers) ) {
+    if (("$header" ne "HTTP_ACCEPT_ENCODING") &&
+        ("$header" ne "HTTP_ACCEPT_LANGUAGE") &&
+        ("$header" ne "HTTP_ACCEPT") &&
+        ("$header" ne "HTTP_USER_AGENT")) {
+        print "<li>$header = $headers{$header}</li>\n";
+    }
+}
+
 print <<FOOTER
 </ul>
 <script>