On Thu, 10 Feb 2000, Artem Chuprina wrote:
> Настоящим прицеплен патч. Если в ближайшие несколько часов ругани не будет,
> отправлю Дугу. И пойду-ка я в mod_perl гляну, на предмет $r->content...
Глянул. Но не проверял:-) Attached. Патчится только Apache.pm, вроде бы.
--
Artem Chuprina E-mail: ran@xxxxxxxxx
Programmer FIDO: 2:5020/371.32
Memonet Ltd. Work phone: +7 (095) 290-9055
--- mod_perl-1.21/Apache/Apache.pm.orig Thu Feb 10 14:59:06 2000
+++ mod_perl-1.21/Apache/Apache.pm Thu Feb 10 15:06:09 2000
@@ -46,7 +46,7 @@
sub content {
my($r) = @_;
my $ct = $r->header_in("Content-type") || "";
- return unless $ct eq "application/x-www-form-urlencoded";
+ return unless lc(substr($ct,0,33)) eq "application/x-www-form-urlencoded";
my $buff;
$r->read($buff, $r->header_in("Content-length"));
parse_args(wantarray, $buff);
"Russian Apache" includes software developed
by the Apache Group for use in the Apache HTTP server project
(http://www.apache.org/) See
Apache LICENSE.
Copyright (C) 1995-2001 The Apache Group. All rights reserved.
Copyright (C) 1996 Dm. Kryukov; Copyright (C)
1997-2009 Alex Tutubalin. Design (C) 1998 Max Smolev.