From f70788709c9282d8c7cf33e81647784763d7f4af Mon Sep 17 00:00:00 2001
From: Paul Licameli <paul.licameli@audacityteam.org>
Date: Wed, 26 Jul 2017 01:03:34 -0400
Subject: [PATCH] Bug1227: Make Audacity detect System language on Mac
 correctly

---
 src/Languages.cpp | 32 +++++++++++++++++++++++++++++++-
 1 file changed, 31 insertions(+), 1 deletion(-)

diff --git a/src/Languages.cpp b/src/Languages.cpp
index 7f0deca2f..8b1a99025 100644
--- a/src/Languages.cpp
+++ b/src/Languages.cpp
@@ -64,14 +64,44 @@ static bool TranslationExists(wxArrayString &audacityPathList, wxString code)
    return (results.GetCount() > 0);
 }
 
+#ifdef __WXMAC__
+#include <CoreFoundation/CFLocale.h>
+#include "wx/osx/core/cfstring.h"
+#endif
+
 wxString GetSystemLanguageCode()
 {
    wxArrayString langCodes;
    wxArrayString langNames;
 
    GetLanguages(langCodes, langNames);
+
    int sysLang = wxLocale::GetSystemLanguage();
-   const wxLanguageInfo *info = wxLocale::GetLanguageInfo(sysLang);
+
+   const wxLanguageInfo *info;
+
+#ifdef __WXMAC__
+   // PRL: Bug 1227, system language on Mac may not be right because wxW3 is
+   // dependent on country code too in wxLocale::GetSystemLanguage().
+
+   if (sysLang == wxLANGUAGE_UNKNOWN)
+   {
+      // wxW3 did a too-specific lookup of language and country, when
+      // there is nothing for that combination; try it by language alone.
+
+      // The following lines are cribbed from that function.
+      wxCFRef<CFLocaleRef> userLocaleRef(CFLocaleCopyCurrent());
+      wxCFStringRef str(wxCFRetain((CFStringRef)CFLocaleGetValue(userLocaleRef, kCFLocaleLanguageCode)));
+      auto lang = str.AsString();
+
+      // Now avoid wxLocale::GetLanguageInfo(), instead calling:
+      info = wxLocale::FindLanguageInfo(lang);
+   }
+   else
+#endif
+   {
+      info = wxLocale::GetLanguageInfo(sysLang);
+   }
 
    if (info) {
       wxString fullCode = info->CanonicalName;