Re: On mod_perl-2.0.8 - err_headers_out.t Fails with HTTP::Headers 6.05
Rolando <[email protected]>
| Newsgroups | gmane.comp.apache.mod-perl |
|---|---|
| Message-ID | <[email protected]> |
On 01/10/13 20:11, Rolando wrote: > Test failing: > > mod_perl-2.0.8/t/api/err_headers_out.t > > Using: > - Perl v5.18.1 > - mod_perl-2.0.8 > - HTTP::Headers 6.05 > > I attached a diff with the changes I made to make the test pass. > I fixed the diff I previously attached. It was ignoring HTML::Headers 6.00
err_headers_out.t.diff
(text/x-patch, 976 B)
--- mod_perl-2.0.8/t/api/err_headers_out.t 2013-09-30 16:08:27.991373585 -0400
+++ mod_perl-2.0.8/t/api/err_headers_out.t.fixed 2013-09-30 16:09:07.535372148 -0400
@@ -25,7 +25,7 @@
local $HTTP::Headers::TRANSLATE_UNDERSCORE=
$HTTP::Headers::TRANSLATE_UNDERSCORE;
undef $HTTP::Headers::TRANSLATE_UNDERSCORE
- if defined HTTP::Headers->VERSION and HTTP::Headers->VERSION==6.00;
+ if defined HTTP::Headers->VERSION and HTTP::Headers->VERSION >= 6.00;
ok t_cmp $res->header('X-err_headers_out'), "err_headers_out",
"X-err_headers_out: made it";
@@ -50,7 +50,7 @@
local $HTTP::Headers::TRANSLATE_UNDERSCORE=
$HTTP::Headers::TRANSLATE_UNDERSCORE;
undef $HTTP::Headers::TRANSLATE_UNDERSCORE
- if defined HTTP::Headers->VERSION and HTTP::Headers->VERSION==6.00;
+ if defined HTTP::Headers->VERSION and HTTP::Headers->VERSION >= 6.00;
ok t_cmp $res->header('X-err_headers_out'), "err_headers_out",
"X-err_headers_out: made it";