From 93f7362199262b479391e2ec52727b18c21b0720 Mon Sep 17 00:00:00 2001
From: Dmitry Bushev <bushevdv@gmail.com>
Date: Tue, 16 Nov 2021 17:18:25 +0300
Subject: [PATCH] Set Locale in Tests (#3158)

---
 test/Tests/src/Data/Locale_Spec.enso | 20 ++++++++++++++++----
 test/Tests/src/Main.enso             |  1 -
 2 files changed, 16 insertions(+), 5 deletions(-)

diff --git a/test/Tests/src/Data/Locale_Spec.enso b/test/Tests/src/Data/Locale_Spec.enso
index 00808a9cfd3..96cd418a359 100644
--- a/test/Tests/src/Data/Locale_Spec.enso
+++ b/test/Tests/src/Data/Locale_Spec.enso
@@ -3,6 +3,16 @@ from Standard.Base import all
 import Standard.Base.Data.Locale
 import Standard.Test
 
+polyglot java import java.util.Locale as JavaLocale
+
+with_locale locale ~test =
+    default_locale = JavaLocale.getDefault
+    JavaLocale.setDefault locale.java_locale
+    result = Panic.recover test . catch_primitive e->
+        JavaLocale.setDefault default_locale
+        Panic.throw e
+    result
+
 spec = Test.group "Locale" <|
     en_gb = Locale.new "en" "GB"
     Test.specify "allow constructing a locale with optional parts" <|
@@ -25,11 +35,13 @@ spec = Test.group "Locale" <|
         locale = Locale.from_language_tag "en-US-x-lvariant-UTF-8"
         locale.variant . should_equal "UTF_8"
     Test.specify "should allow getting the display language" <|
-        display = Locale.from_language_tag "en-GB" . display_language
-        display . should_equal "English"
+        here.with_locale Locale.us <|
+            display = Locale.from_language_tag "en-GB" . display_language
+            display . should_equal "English"
     Test.specify "should allow getting the display country" <|
-        display = Locale.from_language_tag "en-GB" . display_country
-        display . should_equal "United Kingdom"
+        here.with_locale Locale.us <|
+            display = Locale.from_language_tag "en-GB" . display_country
+            display . should_equal "United Kingdom"
     Test.specify "should allow getting the display variant" <|
         display = Locale.from_language_tag "en-GB-x-lvariant-UTF8" . display_variant
         display . should_equal "UTF8"
diff --git a/test/Tests/src/Main.enso b/test/Tests/src/Main.enso
index 48115ea287d..05d229676df 100644
--- a/test/Tests/src/Main.enso
+++ b/test/Tests/src/Main.enso
@@ -83,4 +83,3 @@ main = Test.Suite.run_main <|
     Time_Spec.spec
     Uri_Spec.spec
     Vector_Spec.spec
-