| Subject: | Yet another SVN::Web mp2 patch |
| Date: | Mon, 01 May 2006 00:56:46 -0400 |
| To: | bug-SVN-Web [...] rt.cpan.org |
| From: | Garrison Hoffman <garrison [...] codefix.net> |
Hey, it's the mod_perl2 guy again.
MP2 syntax is $cfg->{request}->headers_out();
This patch should pass the tests ;)
--
Show quoted text
__________________________________________________________________
Garrison Hoffman Codefix Consulting 1.718.210.3445
garrison@codefix.net http://codefix.net/ 1.866.456.0584
Index: Web.pm
===================================================================
--- Web.pm (revision 3)
+++ Web.pm (working copy)
@@ -731,7 +731,12 @@
$content_type .= $html->{charset} || 'UTF-8';
$cfg->{request}->content_type($content_type);
- $cfg->{request}->send_http_header();
+ if($mod_perl::VERSION >= 1.99) {
+ $cfg->{request}->headers_out();
+ }
+ else {
+ $cfg->{request}->send_http_header();
+ }
if ($html->{template}) {
$template ||= get_template ();