[livejournal] r17570: LJSUP-7168: add X-AWS-Id header to all A...

U   trunk/cgi-bin/Apache/LiveJournal.pm

Modified: trunk/cgi-bin/Apache/LiveJournal.pm
===================================================================
--- trunk/cgi-bin/Apache/LiveJournal.pm	2010-10-15 03:48:45 UTC (rev 17569)
+++ trunk/cgi-bin/Apache/LiveJournal.pm	2010-10-15 07:23:56 UTC (rev 17570)
@@ -301,6 +301,10 @@
     LJ::procnotify_check();
     S2::set_domain('LJ');
 
+    # add server mark
+    my ($aws_id) = $LJ::HARDWARE_SERVER_NAME =~ /\-(.+)$/;
+    LJ::Request->header_out("X-AWS-Id" => $aws_id || 'unknown');
+
     my $lang = $LJ::DEFAULT_LANG || $LJ::LANGS[0];
     BML::set_language($lang, \&LJ::Lang::get_text);
 
@@ -1573,7 +1577,6 @@
     my $user = $RQ{'user'};
 
     my $html = LJ::make_journal($user, $RQ{'mode'}, $remote, $opts);
-
     # Allow to add extra http-header or even modify html
     LJ::run_hooks("after_journal_content_created", $opts, \$html);
 
@@ -1790,8 +1793,8 @@
     LJ::Request->header_out('Vary', 'Accept-Encoding, ETag');
 
     # add server mark
-    my ($aws_id) = $LJ::HARDWARE_SERVER_NAME =~ /\-(.+)$/;
-    LJ::Request->header_out("X-AWS-Id" => $aws_id || 'unknown');
+    #my ($aws_id) = $LJ::HARDWARE_SERVER_NAME =~ /\-(.+)$/;
+    #LJ::Request->header_out("X-AWS-Id" => $aws_id || 'unknown');
 
     LJ::Request->header_out("Content-length", $length);
     LJ::Request->send_http_header();