From 65eeace89c91a37dec30e5c3e8930d509091a36f Mon Sep 17 00:00:00 2001
From: a5ob7r <12132068+a5ob7r@users.noreply.github.com>
Date: Wed, 9 Nov 2022 10:42:07 +0900
Subject: [PATCH] Fix compatibilities with mtl 2.3.1

No longer the version of mtl re-exports Control.Monad (and other
modules), so instead we need to import this module directly to use some
monad utilities.
---
 autodocodec-schema/src/Autodocodec/Schema.hs | 1 +
 autodocodec/src/Autodocodec/Codec.hs         | 1 +
 2 files changed, 2 insertions(+)

diff --git a/autodocodec-schema/src/Autodocodec/Schema.hs b/autodocodec-schema/src/Autodocodec/Schema.hs
index b633455..3ce0283 100644
--- a/autodocodec-schema/src/Autodocodec/Schema.hs
+++ b/autodocodec-schema/src/Autodocodec/Schema.hs
@@ -11,6 +11,7 @@ module Autodocodec.Schema where
 
 import Autodocodec
 import qualified Autodocodec.Aeson.Compat as Compat
+import Control.Monad
 import Control.Monad.State
 import Data.Aeson (FromJSON (..), ToJSON (..))
 import qualified Data.Aeson as JSON
diff --git a/autodocodec/src/Autodocodec/Codec.hs b/autodocodec/src/Autodocodec/Codec.hs
index 668f479..7807d1c 100644
--- a/autodocodec/src/Autodocodec/Codec.hs
+++ b/autodocodec/src/Autodocodec/Codec.hs
@@ -13,6 +13,7 @@
 
 module Autodocodec.Codec where
 
+import Control.Monad
 import Control.Monad.State
 import Data.Aeson (FromJSON, FromJSONKey, ToJSON, ToJSONKey)
 import qualified Data.Aeson as JSON