Index: branches/5.3.x/core/kernel/utility/debugger.php
===================================================================
diff -u -N -r16281 -r16395
--- branches/5.3.x/core/kernel/utility/debugger.php	(.../debugger.php)	(revision 16281)
+++ branches/5.3.x/core/kernel/utility/debugger.php	(.../debugger.php)	(revision 16395)
@@ -1,6 +1,6 @@
 <?php
 /**
-* @version	$Id: debugger.php 16281 2015-09-27 11:00:46Z alex $
+* @version	$Id: debugger.php 16395 2016-11-12 12:43:14Z alex $
 * @package	In-Portal
 * @copyright	Copyright (C) 1997 - 2009 Intechnic. All rights reserved.
 * @license      GNU/GPL
@@ -780,41 +780,54 @@
 			}
 
 			/**
-			 * Advanced version of print_r (for debugger only). Don't print objects recursively
+			 * Advanced version of print_r (for debugger only). Don't print objects recursively.
 			 *
-			 * @param Array $array
-			 * @param bool $return_output return output or print it out
-			 * @param int $tab_count offset in tabs
+			 * @param mixed   $p_array       Value to be printed.
+			 * @param boolean $return_output Return output or print it out.
+			 * @param integer $tab_count     Offset in tabs.
+			 *
 			 * @return string
-			 * @access private
 			 */
-			private function print_r(&$array, $return_output = false, $tab_count = -1)
+			private function print_r(&$p_array, $return_output = false, $tab_count = -1)
 			{
 				static $first_line = true;
 
 				// not an array at all
-				if ( !is_array($array) ) {
-					switch ( gettype($array) ) {
+				if ( !is_array($p_array) ) {
+					switch ( gettype($p_array) ) {
 						case 'NULL':
 							return 'NULL' . "\n";
 							break;
 
 						case 'object':
-							return $this->processObject($array, $tab_count);
+							return $this->processObject($p_array, $tab_count);
 							break;
 
+						case 'resource':
+							return (string)$p_array . "\n";
+							break;
+
 						default:
 							// number or string
-							if ( strlen($array) > 200 ) {
-								$array = substr($array, 0, 50) . ' ...';
+							if ( strlen($p_array) > 200 ) {
+								$p_array = substr($p_array, 0, 50) . ' ...';
 							}
-							return $array . "\n";
+
+							return $p_array . "\n";
 							break;
 					}
 				}
 
 				$output = '';
 
+				if ( count($p_array) > 50 ) {
+					$array = array_slice($p_array, 0, 50);
+					$array[] = '...';
+				}
+				else {
+					$array = $p_array;
+				}
+
 				$tab_count++;
 				$output .= "Array\n" . str_repeat('    ', $tab_count) . "(\n";