From bad35065a7db4589b08ed2f3b3fa109e552fb0d7 Mon Sep 17 00:00:00 2001
From: Filip Komar <filip@mageia.org>
Date: Sat, 1 Feb 2014 15:24:23 +0000
Subject: create function locale_hyphen_underscore and make use of it

---
 langs.inc.php | 22 ++++++++++++++++++++++
 1 file changed, 22 insertions(+)

(limited to 'langs.inc.php')

diff --git a/langs.inc.php b/langs.inc.php
index c779efd9d..7180c9a1e 100644
--- a/langs.inc.php
+++ b/langs.inc.php
@@ -119,6 +119,28 @@ function relocate($langs, $page = '', $default_locale = 'en', $force_accept_lang
     return $relocate;
 }
 
+
+/**
+ * Create string pt_br from string pt-br and alike but leave the rest as is
+ * Return string.
+ * Do not exit the process.
+ *
+ * @param string $locale which we want to change
+ * @param boolean $version_of_locale_uppercase optional, true if we want second part in uppercase (pt_BR)
+ *
+ * @return string
+*/
+function locale_hyphen_underscore($locale, $version_of_locale_uppercase = false)
+{
+    preg_match("/(..)(-)(..)/", $locale, $parsed_locale);
+    if(isset($parsed_locale[3])) {
+        return $parsed_locale[1] . '_' . ($version_of_locale_uppercase ? strtoupper($parsed_locale[3]) : $parsed_locale[3]);
+    } else {
+        return $locale;
+    }
+}
+
+
 /**
 */
 function show_langs($langs)
-- 
cgit v1.2.1