stas 2004/07/23 16:46:59
Modified: t/api content_encoding.t t/response/TestAPI content_encoding.pm Log: cleanup Revision Changes Path 1.2 +1 -0 modperl-2.0/t/api/content_encoding.t Index: content_encoding.t =================================================================== RCS file: /home/cvs/modperl-2.0/t/api/content_encoding.t,v retrieving revision 1.1 retrieving revision 1.2 diff -u -u -r1.1 -r1.2 --- content_encoding.t 23 Jul 2004 23:46:11 -0000 1.1 +++ content_encoding.t 23 Jul 2004 23:46:59 -0000 1.2 @@ -15,6 +15,7 @@ my $received = $res->content; #t_debug($received); + if ($res->header('Content-Encoding') =~ /gzip/) { require Compress::Zlib; 1.2 +1 -1 modperl-2.0/t/response/TestAPI/content_encoding.pm Index: content_encoding.pm =================================================================== RCS file: /home/cvs/modperl-2.0/t/response/TestAPI/content_encoding.pm,v retrieving revision 1.1 retrieving revision 1.2 diff -u -u -r1.1 -r1.2 --- content_encoding.pm 23 Jul 2004 23:46:11 -0000 1.1 +++ content_encoding.pm 23 Jul 2004 23:46:59 -0000 1.2 @@ -3,7 +3,7 @@ # tests: $r->content_encoding("gzip"); use strict; -use warnings;# FATAL => 'all'; +use warnings FATAL => 'all'; use Apache::RequestRec (); use Apache::RequestUtil ();