Index: branches/5.2.x/core/units/configuration/configuration_tag_processor.php
===================================================================
diff -u -N -r13840 -r14095
--- branches/5.2.x/core/units/configuration/configuration_tag_processor.php	(.../configuration_tag_processor.php)	(revision 13840)
+++ branches/5.2.x/core/units/configuration/configuration_tag_processor.php	(.../configuration_tag_processor.php)	(revision 14095)
@@ -1,6 +1,6 @@
 <?php
 /**
-* @version	$Id: configuration_tag_processor.php 13613 2010-05-24 18:56:24Z alex $
+* @version	$Id: configuration_tag_processor.php 14095 2010-12-28 17:37:07Z alex $
 * @package	In-Portal
 * @copyright	Copyright (C) 1997 - 2009 Intechnic. All rights reserved.
 * @license      GNU/GPL
@@ -16,10 +16,10 @@
 
 class ConfigurationTagProcessor extends kDBTagProcessor {
 
-
-	function Init($prefix,$special,$event_params=null)
+	public function __construct()
 	{
-		parent::Init($prefix, $special, $event_params);
+		parent::__construct();
+
 		$this->Application->LinkVar('module_key');
 	}
 
@@ -45,14 +45,16 @@
 
 		$prev_heading = '';
 		$next_block = $params['full_block'];
-		$this->groupRecords($list->Records, 'Heading');
+		$list->groupRecords('Heading');
 		$field_values = $this->Application->GetVar( $this->getPrefixSpecial(true) );
 
 		while (!$list->EOL()) {
 			$this->Application->SetVar( $this->getPrefixSpecial() . '_id', $list->GetDBField($id_field) ); // for edit/delete links using GET
 
 			// using 2 blocks for drawing o row in case if current & next record titles match
-			$next_item_prompt = $list->CurrentIndex + 1 < $list->RecordsCount ? $list->Records[$list->CurrentIndex + 1]['Prompt'] : '';
+			$next_record =& $list->getCurrentRecord(1);
+
+			$next_item_prompt = $next_record !== false ? $next_record['Prompt'] : '';
 			$this_item_prompt = $list->GetDBField('Prompt');
 
 			if ($next_item_prompt == $this_item_prompt) {
@@ -118,7 +120,6 @@
 		$list =& $this->GetList($params);
 		$id_field = $this->Application->getUnitOption($this->Prefix, 'IDField');
 
-		$list->PerPage = -1;
 		$list->Query();
 		$o = '';
 		$list->GoFirst();