Index: branches/RC/admin/index.php
===================================================================
diff -u -r8929 -r10304
--- branches/RC/admin/index.php	(.../index.php)	(revision 8929)
+++ branches/RC/admin/index.php	(.../index.php)	(revision 10304)
@@ -1,42 +1,46 @@
 <?php
 
-$start = getmicrotime();
+	$start = getmicrotime();
 
-define('ADMIN', 1);
-define('FULL_PATH', realpath(dirname(__FILE__).'/..') );
-if (!file_exists(FULL_PATH.'/core/kernel/application.php')) {
-	die('Please re-checkout _inportal_kernel4 cvs module into the root directory ('.FULL_PATH.') and remove kernel/kernel4 folder. Make sure to checkout correct branch (RC or HEAD).');
-}
-include_once(FULL_PATH.'/core/kernel/startup.php');
+	define('ADMIN', 1);
+	define('FULL_PATH', realpath(dirname(__FILE__).'/..') );
+	if (!file_exists(FULL_PATH.'/core/kernel/application.php')) {
+		die('Please re-checkout _inportal_kernel4 cvs module into the root directory ('.FULL_PATH.') and remove kernel/kernel4 folder. Make sure to checkout correct branch (RC or HEAD).');
+	}
 
-/*
-	kApplication $application
-*/
-$application =& kApplication::Instance();
-$application->Init();
-$application->Run();
-$application->Done();
+	include_once(FULL_PATH.'/core/kernel/startup.php');
 
-$end = getmicrotime();
+	if (DIRECTORY_SEPARATOR != '\\') {
+		// force user to remove write permissions for important files (Linux only)
+		if (check_write_permissions(FULL_PATH.'/config.php') || check_write_permissions(FULL_PATH)) {
+			die('Please remove write permissions from "config.php" file and root website folder.');
+		}
+	}
 
-function getmicrotime()
-{
-    list($usec, $sec) = explode(" ", microtime());
-    return ((float)$usec + (float)$sec);
-}
+	$application =& kApplication::Instance();
+	$application->Init();
+	$application->Run();
+	$application->Done();
 
-//update_memory_check_script();
+	$end = getmicrotime();
 
-function update_memory_check_script() {
-	$files = get_included_files();
-	$script = '$files = Array('."\n";
-	foreach ($files as $file_name) {
-		$script .= "\t\t'".str_replace(FULL_PATH, '', $file_name)."',\n";
+	function getmicrotime()
+	{
+	    list($usec, $sec) = explode(" ", microtime());
+	    return ((float)$usec + (float)$sec);
 	}
-	$script .= ");\n";
-	echo "<pre>";
-	echo $script;
-	echo "</pre>";
-}
 
+	//update_memory_check_script();
+
+	function update_memory_check_script() {
+		$files = get_included_files();
+		$script = '$files = Array('."\n";
+		foreach ($files as $file_name) {
+			$script .= "\t\t'".str_replace(FULL_PATH, '', $file_name)."',\n";
+		}
+		$script .= ");\n";
+		echo "<pre>";
+		echo $script;
+		echo "</pre>";
+	}
 ?>
\ No newline at end of file