| Subject: | SOAP::Transport::HTTP line 807 (SOAP::Lite 0.710.10) Only the last Cookie is set |
| Date: | Thu, 28 Jan 2010 18:09:06 -0800 |
| To: | bug-SOAP-Lite [...] rt.cpan.org |
| From: | Michael Thomas <mockodin [...] gmail.com> |
Show quoted text
> if ( $self->{'MOD_PERL_VERSION'} > 1 ) {
> $self->response->headers->scan( sub { $r->headers_out->set(@_) } ); <- line 807
> $r->content_type( join '; ', $self->response->content_type );
> }
> else {
> $self->response->headers->scan( sub { $r->header_out(@_) } );
> $r->send_http_header( join '; ', $self->response->content_type );
> }
> $r->print( $self->response->content );
> return $self->{OK};
Should be:
$self->response->headers->scan( sub { $r->headers_out->add(@_) } );
$r->headers_out->set() appears to keep overwriting the same cookie
header with each subsequent cookie, there by setting only the last
$r->headers_out->add() on the other hand properly adds each uniquely
Issue found will debugging login issues in Bugzilla::WebService::XMLRPC
I thought it worked previously so I'm wondering if header_out->set
changed somehow?
~Mockodin