On Fri, 15 Sep 2000, ___cliff rayman___ wrote:

> Matt Sergeant wrote:
> 
> >
> > Gzipped results to the browser, ripped straight from Apache::GzipChain:
> >
> > #     AxKit::Debug(5, 'Getting Vary header');
> > #     my @vary = $r->header_out('Vary') if $r->header_out('Vary');
> > #     push @vary, "Accept-Encoding", "User-Agent";
> > #     AxKit::Debug(5, 'Setting Vary header');
> > #     $r->header_out('Vary',
> > #                     join ", ",
> > #                     @vary
> > #                 );
> >
> 
> excuse my ignorance,  but for my own knowledge, what is the problem with this code?  
>is it the
> "my @vary" with the "if" conditional??

I think its a mod_perl bug. There's nothing leaky in the perl here.

-- 
<Matt/>

Fastnet Software Ltd. High Performance Web Specialists
Providing mod_perl, XML, Sybase and Oracle solutions
Email for training and consultancy availability.
http://sergeant.org | AxKit: http://axkit.org


Reply via email to