From 85c5f0513a9dce118895c304a9598bd2dfc91896 Mon Sep 17 00:00:00 2001
From: nate <nate@cakephp.org>
Date: Fri, 16 Mar 2007 14:59:40 +0000
Subject: [PATCH] Adding env('HTTP_BASE') to get base domain

git-svn-id: https://svn.cakephp.org/repo/branches/1.2.x.x@4622 3807eeeb-6ff5-0310-8944-8be069107fe0
---
 cake/basics.php | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/cake/basics.php b/cake/basics.php
index 351047c82..3ef411a14 100644
--- a/cake/basics.php
+++ b/cake/basics.php
@@ -991,6 +991,9 @@
 			case 'CGI_MODE':
 				return (substr(php_sapi_name(), 0, 3) == 'cgi');
 			break;
+			case 'HTTP_BASE':
+				return preg_replace ('/^([^.])*/i', null, env('HTTP_HOST'));
+			break;
 		}
 		return null;
 	}