diff --git a/code/LeftAndMain.php b/code/LeftAndMain.php
index 59f1f2ef..e9c35115 100644
--- a/code/LeftAndMain.php
+++ b/code/LeftAndMain.php
@@ -799,9 +799,11 @@ JS;
 	 * LeftAndMain::setApplicationName("Something New")
 	 */
 	static $application_name = "SilverStripe CMS", $application_logo_text = "SilverStripe";
-	static function setApplicationName($name, $logoText = null) {
+	static $application_link = "http://www.silverstripe.com/";
+	static function setApplicationName($name, $logoText = null, $link = null) {
 		self::$application_name = $name;
 		self::$application_logo_text = $logoText ? $logoText : $name;
+		if($link) self::$application_link = $link;
 	}
 	function ApplicationName() {
 		return self::$application_name;
@@ -809,6 +811,9 @@ JS;
 	function ApplicationLogoText() {
 		return self::$application_logo_text;
 	}
+	function ApplicationLink() {
+		return self::$application_link;
+	}
 
 	static $application_logo = "cms/images/mainmenu/logo.gif", $application_logo_style = "";
 
diff --git a/templates/LeftAndMain.ss b/templates/LeftAndMain.ss
index 483aab20..32e663f2 100644
--- a/templates/LeftAndMain.ss
+++ b/templates/LeftAndMain.ss
@@ -44,7 +44,7 @@
 	<div id="bottom">
 		<div class="holder">
 		<div id="logInStatus">
-			<a href="http://www.silverstripe.com" title="<% _t('SSWEB','Silverstripe Website') %>">SilverStripe CMS</a>&nbsp;-&nbsp;
+			<a href="$ApplicationLink" title="<% _t('SSWEB','Silverstripe Website') %>">$ApplicationName</a>&nbsp;-&nbsp;
 			<abbr style="border-style: none" title="<% _t('APPVERSIONTEXT1',"This is the") %> $ApplicationName <% _t('APPVERSIONTEXT2',"version that you are currently running, technically it's the CVS branch") %>">$CMSVersion</abbr> &nbsp; &nbsp; &nbsp; 
 			<% control CurrentMember %>
 			<% _t('LOGGEDINAS','Logged in as') %> <strong><% if FirstName && Surname %>$FirstName $Surname<% else_if FirstName %>$FirstName<% else %>$Email<% end_if %></strong> | <a href="{$BaseHref}admin/myprofile" id="EditMemberProfile"><% _t('EDITPROFILE','Profile') %></a> | <a href="Security/logout" id="LogoutLink"><% _t('LOGOUT','log out') %></a>