X-Git-Url: https://delta.frontaccounting.com/gitweb/?a=blobdiff_plain;f=admin%2Finst_lang.php;h=214a1dceb4d79823ab9c39b497f6f1eab04f0ff9;hb=e4601ecbe842aafa7f0424abc67ec7ba55139dff;hp=9c8ea4b555cbe1c565ae026864b1f2a3d0081968;hpb=dd16990fa4fc3ed8698ebf8ac85743d36a89ff3b;p=fa-stable.git

diff --git a/admin/inst_lang.php b/admin/inst_lang.php
index 9c8ea4b5..214a1dce 100644
--- a/admin/inst_lang.php
+++ b/admin/inst_lang.php
@@ -44,74 +44,6 @@ function check_data()
 	return true;
 }
 
-function write_lang()
-{
-	global $path_to_root, $installed_languages, $dflt_lang;
-	include_once($path_to_root . "/lang/installed_languages.inc");
-
-	$conn = array_natsort($installed_languages, 'code', 'code');
-	$installed_languages = $conn;
-	//reset($installed_languages);
-	$n = count($installed_languages);
-	$msg = "<?php\n\n";
-
-	$msg .= "/* How to make new entries here\n\n";
-	$msg .= "-- if adding languages at the beginning of the list, make sure it's index is set to 0 (it has ' 0 => ')\n";
-	$msg .= "-- 'code' should match the name of the directory for the language under \\lang\n";
-	$msg .= "-- 'name' is the name that will be displayed in the language selection list (in Users and Display Setup)\n";
-	$msg .= "-- 'rtl' only needs to be set for right-to-left languages like Arabic and Hebrew\n\n";
-	$msg .= "*/\n\n\n";
-
-	$msg .= "\$installed_languages = array (\n";
-	if ($n > 0)
-	    $msg .= "\t0 => ";
-	for ($i = 0; $i < $n; $i++)
-	{
-		if ($i > 0)
-			$msg .= "\t\tarray ";
-		else
-			$msg .= "array ";
-		$msg .= "('code' => '" . $installed_languages[$i]['code'] . "', ";
-		$msg .= "'name' => '" . $installed_languages[$i]['name'] . "', ";
-		$msg .= "'encoding' => '" . $installed_languages[$i]['encoding'] . "'";
-		if (isset($installed_languages[$i]['rtl']) && $installed_languages[$i]['rtl'])
-			$msg .= ", 'rtl' => true),\n";
-		else
-			$msg .= "),\n";
-	}
-
-	$msg .= "\t);\n";
-	$msg .= "\n\$dflt_lang = '$dflt_lang';\n?>\n";
-
-	$filename = $path_to_root . "/lang/installed_languages.inc";
-	// Check if the file exists and is writable first.
-	if (file_exists($filename) && is_writable($filename))
-	{
-		if (!$zp = fopen($filename, 'w'))
-		{
-			display_error(_("Cannot open the languages file - ") . $filename);
-			return false;
-		}
-		else
-		{
-			if (!fwrite($zp, $msg))
-			{
-				display_error(_("Cannot write to the language file - ") . $filename);
-				fclose($zp);
-				return false;
-			}
-			// Close file
-			fclose($zp);
-		}
-	}
-	else
-	{
-		display_error(_("The language file ") . $filename . _(" is not writable. Change its permissions so it is, then re-run the operation."));
-		return false;
-	}
-	return true;
-}
-
 //---------------------------------------------------------------------------------------------
 
 function handle_submit()