Committer: vad
Add server watermarkU trunk/lib/Apache/BML.pm
Modified: trunk/lib/Apache/BML.pm =================================================================== --- trunk/lib/Apache/BML.pm 2010-10-05 09:19:59 UTC (rev 131) +++ trunk/lib/Apache/BML.pm 2010-10-05 09:46:42 UTC (rev 132) @@ -403,6 +403,10 @@ LJ::Request->header_out("Cache-Control", "private, proxy-revalidate") unless $cache_control; LJ::Request->header_out("ETag", $etag) if defined $etag; + # add server mark + my ($aws_id) = $LJ::HARDWARE_SERVER_NAME =~ /\-(.+)$/; + LJ::Request->header_out("X-AWS-Id" => $aws_id || 'unknown'); + # gzip encoding my $do_gzip = $env->{'DoGZIP'} && $Apache::BML::HAVE_ZLIB && $LJ::DO_GZIP; my $length = length($html);