Re: Re: Forward-page ugliness solved (patch from Martin Ertl)

Tested and confirmed working with apache 1, at least on my gentoo box.

   // Joel


On Wed, 13 Oct 2004, Joel Palmius wrote:

> Ok, now I have implemented a change which should ideally work. In Submit.pm:
>
> use mod_perl;
> use constant MP2 => $mod_perl::VERSION < 1.99 ? 0 : 1;
>
> ...
>
> if(MP2)
> {
> $doc->{HANDLER}->headers_out->set('Location' => $redirectUrl);
> $doc->{HANDLER}->status(REDIRECT);
> }
> else
> {
>  print "Location: $redirectUrl\n\n";
> }
>
> I hope this works. It does under apache2 at least. I'll install apache1 this 
> afternoon so I have a test environment myself.
>
> This is in CVS, so please test.
>
>  // Joel
>
>
> On Wed, 13 Oct 2004, Joel Palmius wrote:
>
>> The problem with that is that it doesn't work on Apache2, depending on the 
>> setting of PerlSendHeader, which is needed for cookies to work properly 
>> (again under apache2). When doing this replace, the page forwarding stops 
>> working for me.
>> 
>> Perhaps there should be an if statement here deciding which style to use 
>> depending on apache version and/or setting of PerlSendHeader.
>> 
>> I'll look into it.
>> 
>> // Joel
>> 
>> 
>> On Wed, 13 Oct 2004, Martin Ertl wrote:
>> 
>>> There seems to be a problem with "headers_out()" on Apache 1
>>> (at least here on the testserver)
>>> 
>>> The following solved this problem:
>>> (it looks ugly, but it works on the testserver)
>>> 
>>> Replace in Submit.pm, line 250:
>>> $doc->{HANDLER}->headers_out->set('Location' => $redirectUrl);
>>> $doc->{HANDLER}->status(REDIRECT);
>>> 
>>> with:
>>> print "Location: $redirectUrl\n\n";
>>> 
>>> 
>>> 
>>> Skickat av Martin Ertl <[email protected]>
>>> till survey-discussion
>>> 
>> Skickat av Joel Palmius <[email protected]>
>> till survey-discussion
>> 
> Skickat av Joel Palmius <[email protected]>
> till survey-discussion
>
>
Skickat av Joel Palmius <[email protected]>
till survey-discussion