SVN: toys/rsget.pl: RSGet/HTTPServer.pm data/main.js
sparky
sparky at pld-linux.org
Wed Nov 10 15:24:08 CET 2010
Author: sparky
Date: Wed Nov 10 15:24:08 2010
New Revision: 11902
Modified:
toys/rsget.pl/RSGet/HTTPServer.pm
toys/rsget.pl/data/main.js
Log:
- moved connection: close http header from client to server
Modified: toys/rsget.pl/RSGet/HTTPServer.pm
==============================================================================
--- toys/rsget.pl/RSGet/HTTPServer.pm (original)
+++ toys/rsget.pl/RSGet/HTTPServer.pm Wed Nov 10 15:24:08 2010
@@ -117,10 +117,14 @@
$print .= "HTTP/1.1 401 Authorization Required\r\n";
$print .= "WWW-Authenticate: Basic\r\n";
$print .= "Content-Type: text/plain\r\n";
+ $print .= "Connection: close\r\n";
$print .= "\r\nAuthorization Required\n";
} elsif ( my $func = $RSGet::HTTPRequest::handlers{$file} ) {
$print = "HTTP/1.1 200 OK\r\n";
- my $headers = { Content_Type => "text/xml; charset=utf-8" };
+ my $headers = {
+ Content_Type => "text/xml; charset=utf-8",
+ Connection => "close"
+ };
my $data = &$func( $file, \%post, $headers );
$headers->{Content_Length} ||= length $data;
@@ -133,6 +137,7 @@
$print .= $data;
} else {
$print = "HTTP/1.1 404 Not found\r\n";
+ $print .= "Connection: close\r\n";
$print .= "\r\n";
}
Modified: toys/rsget.pl/data/main.js
==============================================================================
--- toys/rsget.pl/data/main.js (original)
+++ toys/rsget.pl/data/main.js Wed Nov 10 15:24:08 2010
@@ -14,7 +14,6 @@
req.open( "POST", link, true );
req.setRequestHeader( 'Content-Type', 'application/x-www-form-urlencoded' );
req.setRequestHeader( 'Content-Length', post.length );
- req.setRequestHeader( 'Connection', 'close' );
req.send( post );
}
More information about the pld-cvs-commit
mailing list