Index: branches/5.1.x/core/units/configuration/configuration.php
===================================================================
diff -u -N -r12127 -r12657
--- branches/5.1.x/core/units/configuration/configuration.php	(.../configuration.php)	(revision 12127)
+++ branches/5.1.x/core/units/configuration/configuration.php	(.../configuration.php)	(revision 12657)
@@ -1,6 +1,6 @@
 <?php
 /**
-* @version	$Id: configuration.php 11892 2009-07-01 08:35:06Z alex $
+* @version	$Id: configuration.php 12657 2009-10-04 20:07:31Z alex $
 * @package	In-Portal
 * @copyright	Copyright (C) 1997 - 2009 Intechnic. All rights reserved.
 * @license      GNU/GPL
@@ -12,8 +12,10 @@
 * See http://www.in-portal.net/license/ for copyright notices and details.
 */
 
+	defined('FULL_PATH') or die('restricted access!');
+
 	class ConfigurationItem extends kDBItem {
-		
+
 		/**
 		 * Returns key clause for Load,Update,Delete operations
 		 * Applies current section filter to affect only configuration values,
@@ -29,7 +31,25 @@
 			$keys_hash[$this->IDField] = $this->ID;
 			return parent::GetKeyClause($method, $keys_hash);
 		}
-		
-	}
 
-?>
\ No newline at end of file
+		/**
+		 * Set's field error, if pseudo passed not found then create it with message text supplied.
+		 * Don't owerrite existing pseudo translation.
+		 *
+		 * @param string $field
+		 * @param string $pseudo
+		 * @param string $error_label
+		 */
+		function SetError($field, $pseudo, $error_label = null, $error_params = null)
+		{
+			if (!parent::SetError($field, $pseudo, $error_label, $error_params)) {
+				// this field already has an error -> don't overwrite it
+				return false;
+			}
+
+			$list_errors = $this->Application->GetVar('errors_' . $this->getPrefixSpecial(), Array ());
+			$list_errors[ $this->GetDBField('VariableName') ] = $this->GetErrorMsg($field);
+			$this->Application->SetVar('errors_' . $this->getPrefixSpecial(), $list_errors);
+		}
+
+	}
\ No newline at end of file