jorton 2004/06/17 01:52:40
Modified: perl-framework/t/htdocs/modules/cgi ranged.pl.PL
Log:
Fix the request header handling.
Revision Changes Path
1.2 +1 -1
httpd-test/perl-framework/t/htdocs/modules/cgi/ranged.pl.PL
Index: ranged.pl.PL
===================================================================
RCS file:
/home/cvs/httpd-test/perl-framework/t/htdocs/modules/cgi/ranged.pl.PL,v
retrieving revision 1.1
retrieving revision 1.2
diff -d -w -u -r1.1 -r1.2
--- ranged.pl.PL 16 Jun 2004 17:11:57 -0000 1.1
+++ ranged.pl.PL 17 Jun 2004 08:52:40 -0000 1.2
@@ -2,7 +2,7 @@
print "Content-type: text/plain\n";
-if ($ENV{'Range'} eq 'bytes=5-10/10') {
+if ($ENV{'HTTP_RANGE'} eq 'bytes=5-10/10') {
print "Content-Range: bytes 5-10/10\n\n";
print "hello\n";
} else {
