You are viewing a plain text version of this content. The canonical link for it is here.
Posted to test-cvs@httpd.apache.org by je...@apache.org on 2002/01/02 07:12:19 UTC

cvs commit: httpd-test/perl-framework/t/http11 chunked.t

jerenkrantz    02/01/01 22:12:19

  Modified:    perl-framework/t/http11 chunked.t
  Log:
  LWP 5.61 silently morphs Transfer-Encoding to Client-Transfer-Encoding.
  
  The extra || seems to be the convention for other LWPisms.
  
  Thanks to Google: http://archive.develooper.com/libwww@perl.org/msg03162.html
  
  Revision  Changes    Path
  1.14      +3 -1      httpd-test/perl-framework/t/http11/chunked.t
  
  Index: chunked.t
  ===================================================================
  RCS file: /home/cvs/httpd-test/perl-framework/t/http11/chunked.t,v
  retrieving revision 1.13
  retrieving revision 1.14
  diff -u -r1.13 -r1.14
  --- chunked.t	6 Dec 2001 23:00:26 -0000	1.13
  +++ chunked.t	2 Jan 2002 06:12:19 -0000	1.14
  @@ -38,7 +38,9 @@
   
           ok $res->protocol eq 'HTTP/1.1';
   
  -        my $enc = $res->header('Transfer-Encoding') || '';
  +        my $enc = $res->header('Transfer-Encoding') || 
  +                  $res->header('Client-Transfer-Encoding') || #lwp 5.61+
  +                  '';
           ok $enc eq 'chunked';
           ok ! $res->header('Content-Length');