Index: branches/5.1.x/core/install/upgrades.php
===================================================================
diff -u -N -r13780 -r13824
--- branches/5.1.x/core/install/upgrades.php	(.../upgrades.php)	(revision 13780)
+++ branches/5.1.x/core/install/upgrades.php	(.../upgrades.php)	(revision 13824)
@@ -1,6 +1,6 @@
 <?php
 /**
-* @version	$Id: upgrades.php 13780 2010-06-15 20:36:27Z alex $
+* @version	$Id: upgrades.php 13824 2010-07-12 18:43:05Z alex $
 * @package	In-Portal
 * @copyright	Copyright (C) 1997 - 2009 Intechnic. All rights reserved.
 * @license      GNU/GPL
@@ -1682,4 +1682,20 @@
 
 			$this->Conn->Query('ALTER TABLE ' . TABLE_PREFIX . 'Events DROP FromUserId');
 		}
+
+		/**
+		 * Update to 5.1.0; Fixes refferer of form submissions
+		 *
+		 * @param string $mode when called mode {before, after)
+		 */
+		function Upgrade_5_1_0($mode)
+		{
+			if ($mode == 'after') {
+				$base_url = $this->Application->BaseURL();
+
+				$sql = 'UPDATE ' . TABLE_PREFIX . 'FormSubmissions
+						SET ReferrerURL = REPLACE(ReferrerURL, ' . $this->Conn->qstr($base_url) . ', "/")';
+				$this->Conn->Query($sql);
+			}
+		}
 	}
\ No newline at end of file