--- loncom/auth/loncacc.pm 2000/07/01 17:57:01 1.7 +++ loncom/auth/loncacc.pm 2000/09/15 15:04:17 1.8 @@ -7,7 +7,7 @@ package Apache::loncacc; use strict; -use Apache::Constants qw(:common :http); +use Apache::Constants qw(:common :http :methods); use Apache::File; use CGI::Cookie(); @@ -48,6 +48,7 @@ sub handler { "request.state" => "construct", "request.filename" => $r->filename); my $buffer; + $r->read($buffer,$r->header_in('Content-length')); my @pairs=split(/&/,$buffer); my $pair; my $name; my $value; @@ -57,6 +58,11 @@ sub handler { $value =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C",hex($1))/eg; $r->subprocess_env("form.$name" => $value); } + + $r->method_number(M_GET); + $r->method('GET'); + $r->headers_in->unset('Content-length'); + return OK; } else { $r->log_reason("Cookie $handle not valid", $r->filename)