From eb2b3c0ea68ebe43e1828d7a90e3889543b19832 Mon Sep 17 00:00:00 2001
From: Laurent Destailleur <eldy@users.sourceforge.net>
Date: Sat, 27 Feb 2010 10:17:06 +0000
Subject: [PATCH] New: Add logo of country "near" language in setup pages.

---
 htdocs/soc.php | 10 +++++++---
 1 file changed, 7 insertions(+), 3 deletions(-)

diff --git a/htdocs/soc.php b/htdocs/soc.php
index a0341eea8bf..6db9bc749eb 100644
--- a/htdocs/soc.php
+++ b/htdocs/soc.php
@@ -1255,12 +1255,16 @@ else
 	$soc->typent= $arr[$soc->typent_code];
 	print '<tr><td>'.$langs->trans("Type").'</td><td>'.$soc->typent.'</td><td>'.$langs->trans("Staff").'</td><td>'.$soc->effectif.'</td></tr>';
 
-	// Language
+	// Default language
 	if ($conf->global->MAIN_MULTILANGS)
 	{
+		print '<tr><td>'.$langs->trans("DefaultLang").'</td><td colspan="3">';
+		$s=picto_from_langcode($soc->default_lang);
+		print ($s?$s.' ':'');
 		$langs->load("languages");
-		$labellang = ($soc->default_lang?$langs->trans('Language_'.$soc->default_lang).' ('.$soc->default_lang.')':'');
-		print '<tr><td>'.$langs->trans("DefaultLang").'</td><td colspan="3">'.$labellang.'</td></tr>';
+		$labellang = ($soc->default_lang?$langs->trans('Language_'.$soc->default_lang):'');
+		print $labellang;
+		print '</td></tr>';
 	}
 
 	// Ban