Index: branches/5.1.x/tools/cron.php
===================================================================
diff -u -N -r12127 -r12657
--- branches/5.1.x/tools/cron.php	(.../cron.php)	(revision 12127)
+++ branches/5.1.x/tools/cron.php	(.../cron.php)	(revision 12657)
@@ -1,6 +1,6 @@
 <?php
 /**
-* @version	$Id: cron.php 11892 2009-07-01 08:35:06Z alex $
+* @version	$Id: cron.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,26 +12,38 @@
 * See http://www.in-portal.net/license/ for copyright notices and details.
 */
 
-// Use this line to invoke from cron.
-// wget http://<server_address>/tools/cron.php -O /dev/null > /dev/null 2>&1
+	// Use this line to invoke from cron.
+	// wget http://<server_address>/tools/cron.php -O /dev/null > /dev/null 2>&1
 
-define('FULL_PATH', realpath(dirname(__FILE__).'/..'));
-define('REL_PATH', 'tools/');
-define('ADMIN', 1);
+	$start = getmicrotime();
 
-include_once(FULL_PATH.'/core/kernel/startup.php');
+	define('CRON', 1);
+	define('ADMIN', 1);
+	define('REL_PATH', 'tools');
+	define('FULL_PATH', realpath(dirname(__FILE__) . '/..'));
+	define('CMD_MODE', isset($argv) && count($argv) ? 1 : 0);
 
-$application =& kApplication::Instance();
-$application->Init();
+	if (CMD_MODE) {
+		define('DBG_SKIP_REPORTING', 1);
+		$_SERVER['HTTP_USER_AGENT'] = 'gecko';
+		$_SERVER['HTTP_HOST'] = 'localhost';
+	}
 
-$event_manager =& $application->recallObject('EventManager');
-$event_manager->RunRegularEvents(reBEFORE, true);
-$event_manager->RunRegularEvents(reAFTER, true);
+	include_once(FULL_PATH . '/core/kernel/startup.php');
 
-function getmicrotime()
-{
-    list($usec, $sec) = explode(" ", microtime());
-    return ((float)$usec + (float)$sec);
-}
+	$application =& kApplication::Instance();
+	$application->Init();
 
-?>
\ No newline at end of file
+	// events from request are not processed, only predefined regular events
+	$application->EventManager->RunRegularEvents(reBEFORE, true);
+	$application->EventManager->RunRegularEvents(reAFTER, true);
+
+	$application->Done();
+
+	$end = getmicrotime();
+
+	function getmicrotime()
+	{
+	    list($usec, $sec) = explode(" ", microtime());
+	    return ((float)$usec + (float)$sec);
+	}
\ No newline at end of file