Index: branches/5.1.x/core/kernel/db/cat_tag_processor.php
===================================================================
diff -u -N -r13168 -r13461
--- branches/5.1.x/core/kernel/db/cat_tag_processor.php	(.../cat_tag_processor.php)	(revision 13168)
+++ branches/5.1.x/core/kernel/db/cat_tag_processor.php	(.../cat_tag_processor.php)	(revision 13461)
@@ -1,6 +1,6 @@
 <?php
 /**
-* @version	$Id: cat_tag_processor.php 13168 2010-02-24 17:26:57Z alex $
+* @version	$Id: cat_tag_processor.php 13461 2010-04-28 13:10:19Z alex $
 * @package	In-Portal
 * @copyright	Copyright (C) 1997 - 2009 Intechnic. All rights reserved.
 * @license      GNU/GPL
@@ -878,4 +878,32 @@
 
 			return false;
 		}
+
+		/**
+		 * Returns list of categories, that have add/edit permission for current category item type
+		 *
+		 * @param Array $params
+		 * @return string
+		 */
+		function AllowedCategoriesJSON($params)
+		{
+			if ($this->Application->RecallVar('user_id') == -1) {
+				$categories = true;
+			}
+			else {
+				$object =& $this->getObject($params);
+				/* @var $object kDBItem */
+
+				$perm_helper =& $this->Application->recallObject('PermissionsHelper');
+				/* @var $perm_helper kPermissionsHelper */
+
+				$perm_prefix = $this->Application->getUnitOption($this->Prefix, 'PermItemPrefix');
+				$categories = $perm_helper->getPermissionCategories($perm_prefix . '.' . ($object->IsNewItem() ? 'ADD' : 'MODIFY'));
+			}
+
+			$json_helper =& $this->Application->recallObject('JSONHelper');
+			/* @var $json_helper JSONHelper */
+
+			return $json_helper->encode($categories);
+		}
 	}
\ No newline at end of file