From 99ce2c7c06aa1a02162275deb19fecfdfd13ce34 Mon Sep 17 00:00:00 2001 From: Danila Danko Date: Thu, 5 Dec 2024 00:09:09 +0300 Subject: [PATCH] refactor(eo-phi-normalizer): remove module names --- eo-phi-normalizer/Setup.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/eo-phi-normalizer/Setup.hs b/eo-phi-normalizer/Setup.hs index 127cffe93..1223ac137 100644 --- a/eo-phi-normalizer/Setup.hs +++ b/eo-phi-normalizer/Setup.hs @@ -53,7 +53,7 @@ writeFile' path = BS.writeFile path . encodeUtf8 withCorrectLocale :: IO a -> IO a withCorrectLocale act = do - let withCorrectLocale' = withCP65001 . Main.Utf8.withUtf8 + let withCorrectLocale' = withCP65001 . withUtf8 withCorrectLocale' act `catch` ( \(x :: SomeException) -> withCorrectLocale' do