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

git-svn-id: http://svn.automattic.com/wordpress/trunk@9769 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 dd1c39d6c..69df9281e 100644
--- a/wp-includes/feed.php
+++ b/wp-includes/feed.php
@@ -498,10 +498,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'])
 		);
 }