@@ -28,7 +28,7 @@ import Data.Aeson.TH (deriveJSON, deriveToJSON, deriveToJSON1)
2828import Data.Aeson.Text (encodeToTextBuilder)
2929import Data.Aeson.Types (Options(..), SumEncoding(..), ToJSON(..), Value, camelTo, camelTo2, defaultOptions, omitNothingFields)
3030import Data.Char (toUpper)
31−import Data.Either (isLeft, isRight)
31+import Data.Either.Compat (isLeft, isRight)
3232import Data.Fixed (Pico)
3333import Data.Functor.Compose (Compose(..))
3434import Data.Functor.Identity (Identity(..))