added LanguageTag::hasScript()

Change-Id: If9eaca46ef8daa544ee208444f79423122b10739

2 files changed, 16 insertions, 0 deletions

diff --git a/i18npool/inc/i18npool/languagetag.hxx b/i18npool/inc/i18npool/languagetag.hxx
index bb86b72262f0..3394c1b99fa8 100644
--- a/i18npool/inc/i18npool/languagetag.hxx
+++ b/i18npool/inc/i18npool/languagetag.hxx
@@ -127,6 +127,8 @@ public:
     /** Get ISO 15924 script code, if not the default script according to
         BCP 47. For default script an empty string is returned.
 
+        @see hasScript()
+
         Always resolves an empty tag to the system locale.
      */
     rtl::OUString                   getScript() const;
@@ -134,6 +136,8 @@ public:
     /** Get combined language and script code, separated by '-' if
         non-default script, if default script only language.
 
+        @see hasScript()
+
         Always resolves an empty tag to the system locale.
      */
     rtl::OUString                   getLanguageAndScript() const;
@@ -152,6 +156,10 @@ public:
      */
     rtl::OUString                   getRegion() const;
 
+    /** If language tag has a non-default script specified.
+     */
+    bool                            hasScript() const;
+
     /** If language tag is a locale that can be expressed using only ISO 639
         language codes and ISO 3166 country codes, thus is convertible to a
         conforming Locale struct without using extension mechanisms.
diff --git a/i18npool/source/languagetag/languagetag.cxx b/i18npool/source/languagetag/languagetag.cxx
index bab244371063..31b1ae0875e3 100644
--- a/i18npool/source/languagetag/languagetag.cxx
+++ b/i18npool/source/languagetag/languagetag.cxx
@@ -898,6 +898,14 @@ rtl::OUString LanguageTag::getRegion() const
 }
 
 
+bool LanguageTag::hasScript() const
+{
+    if (!mbCachedScript)
+        getScript();
+    return !maCachedScript.isEmpty();
+}
+
+
 bool LanguageTag::cacheSimpleLSC()
 {
     OUString aLanguage, aScript, aCountry;