media/courgette: fix borders in install

[jirafeau_mojo42.git] / lib / lang.php

diff --git a/lib/lang.php b/lib/lang.php
old mode 100755 (executable)
new mode 100644 (file)
index fd67e2d..89f890f
--- a/lib/lang.php
+++ b/lib/lang.php
@@ -1,7 +1,7 @@
 <?php\r
 /*\r
  *  Jirafeau, your web file repository\r
 <?php\r
 /*\r
  *  Jirafeau, your web file repository\r

- *  Copyright (C) 2012  Jerome Jutteau <j.jutteau@gmail.com>\r
+ *  Copyright (C) 2015  Jerome Jutteau <j.jutteau@gmail.com>\r

  *\r
  *  This program is free software: you can redistribute it and/or modify\r
  *  it under the terms of the GNU Affero General Public License as\r
  *\r
  *  This program is free software: you can redistribute it and/or modify\r
  *  it under the terms of the GNU Affero General Public License as\r


@@ -17,10 +17,41 @@
  *  along with this program.  If not, see <http://www.gnu.org/licenses/>.\r
  */\r
 \r
  *  along with this program.  If not, see <http://www.gnu.org/licenses/>.\r
  */\r
 \r

-// Translation (TODO)\r
-function _($text)\r
+ global $languages_list;\r
+ $languages_list = array ('auto' => 'Automatic',\r
+                          'en' => 'English',\r
+                          'fr' => 'Français');\r
+\r
+/* Translation */\r
+function t ($text)\r

 {\r
 {\r

-    return ("$text");\r
+    $cfg = $GLOBALS['cfg'];\r
+    $languages_list = $GLOBALS['languages_list'];\r
+\r
+    /* Detect user's langage if we are in automatic mode. */\r
+    if (strcmp ($cfg['lang'], 'auto') == 0)\r
+        $l = substr ($_SERVER['HTTP_ACCEPT_LANGUAGE'], 0, 2);\r
+    else\r
+        $l = $cfg['lang'];\r
+\r
+    /* Is the langage in the list ? */\r
+    $found = false;\r
+    foreach ($languages_list as $key => $v)\r
+        if (strcmp ($l, $key) == 0)\r
+            $found = true;\r
+\r
+    /* Get translation execpt for english. */\r
+    if ($found && strcmp ($l, "en"))\r
+    {\r
+        /* $tr is defined in this requirement. */\r
+        require (JIRAFEAU_ROOT . "lib/lang/lang_$l.php");\r
+\r
+        foreach ($tr as $o => $t)\r
+            if (strcmp ($text, $o) == 0)\r
+                return "$t";\r
+    }\r
+    /* Return original text if no translation is found or already in english. */\r
+    return ($text);\r

 }\r
 \r
 }\r
 \r

-?>
\ No newline at end of file
+?>\r