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