From bbeaaf16fe9beac78bd76a792b0bf372bb93558a Mon Sep 17 00:00:00 2001
From: Andrea Bedini <andrea@andreabedini.com>
Date: Tue, 23 Aug 2022 14:11:15 +0200
Subject: [PATCH] Use with-utf8

---
 app/Main.hs   | 3 ++-
 foliage.cabal | 1 +
 2 files changed, 3 insertions(+), 1 deletion(-)

diff --git a/app/Main.hs b/app/Main.hs
index 2eb12c6..323d271 100644
--- a/app/Main.hs
+++ b/app/Main.hs
@@ -4,9 +4,10 @@ import Foliage.CmdBuild
 import Foliage.CmdCreateKeys
 import Foliage.CmdImportIndex
 import Foliage.Options
+import Main.Utf8 (withUtf8)
 
 main :: IO ()
-main = do
+main = withUtf8 $ do
   putStrLn "🌿 Foliage"
   parseCommand >>= \case
     CreateKeys path -> cmdCreateKeys path
diff --git a/foliage.cabal b/foliage.cabal
index 2114ff3..6b76200 100644
--- a/foliage.cabal
+++ b/foliage.cabal
@@ -51,4 +51,5 @@ executable foliage
         time                 >=1.9.3      && <1.13,
         time-compat          >=1.9.6.1    && <1.10,
         tomland              >=1.3.3.1    && <1.4,
+        with-utf8            >=1.0.2.3    && <1.1,
         zlib                 >=0.6.2.3    && <0.7