From d61ecdbad81f4e96776c3f1287b3bf14633db61e Mon Sep 17 00:00:00 2001
From: ryan <ryan@1a063a9b-81f0-0310-95a4-ce76da25c4cd>
Date: Tue, 18 Nov 2008 23:07:05 +0000
Subject: [PATCH] Use home to determine self link host

git-svn-id: http://svn.automattic.com/wordpress/branches/2.6@9770 1a063a9b-81f0-0310-95a4-ce76da25c4cd
---
 wp-includes/feed.php | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/wp-includes/feed.php b/wp-includes/feed.php
index bed6608d56..83f64b5c04 100644
--- a/wp-includes/feed.php
+++ b/wp-includes/feed.php
@@ -495,10 +495,12 @@ function prep_atom_text_construct($data) {
  * @since 2.5
  */
 function self_link() {
+	$host = @parse_url(get_option('home'));
+	$host = $host['host'];
 	echo clean_url( 
 		'http'
 		. ( (isset($_SERVER['https']) && $_SERVER['https'] == 'on') ? 's' : '' ) . '://'
-		. $_SERVER['HTTP_HOST']
+		. $host
 		. stripslashes($_SERVER['REQUEST_URI'])
 		);
 }