Committer: ssafronova
LJSUP-6426, LJSUP-6437 - prepare for non-default 'cache-control' in bml fileU trunk/lib/Apache/BML.pm
Modified: trunk/lib/Apache/BML.pm =================================================================== --- trunk/lib/Apache/BML.pm 2010-07-20 07:41:26 UTC (rev 128) +++ trunk/lib/Apache/BML.pm 2010-08-18 10:19:24 UTC (rev 129) @@ -399,7 +399,8 @@ LJ::Request->header_out("Last-Modified", $modtime_http) if $env->{'Static'} || $req->{'want_last_modified'}; - LJ::Request->header_out("Cache-Control", "private, proxy-revalidate"); + my $cache_control = LJ::Request->header_out("Cache-Control"); + LJ::Request->header_out("Cache-Control", "private, proxy-revalidate") unless $cache_control; LJ::Request->header_out("ETag", $etag) if defined $etag; # gzip encoding