[bknr-cvs] r2034 - branches/xml-class-rework/projects/bos/tools

[bknr at bknr.net]

Author: hhubner
Date: 2006-10-23 02:05:39 -0400 (Mon, 23 Oct 2006)
New Revision: 2034

Modified:
   branches/xml-class-rework/projects/bos/tools/wp-callpack-redirect.pl
Log:
Pass content-type to handling host.


Modified: branches/xml-class-rework/projects/bos/tools/wp-callpack-redirect.pl
===================================================================
--- branches/xml-class-rework/projects/bos/tools/wp-callpack-redirect.pl	2006-10-23 05:53:29 UTC (rev 2033)
+++ branches/xml-class-rework/projects/bos/tools/wp-callpack-redirect.pl	2006-10-23 06:05:39 UTC (rev 2034)
@@ -18,6 +18,8 @@
 
 	my $is_test = ($content =~ /testMode=100/);
 	my $host = $is_test ? "test.createrainforest.org" : "createrainforest.org";
+
+	$ua->default_header('Content-Type', $request->header('Content-Type'));
 	my $response = $ua->get("http://" . $host . ":8080/handle-sale?" . $content);
 	$client->send_response($response);
 	print "Redirected request to ", ($is_test ? "TEST" : "PRODUCTION"), " system\n";