Skip to content

Commit

Permalink
fix
Browse files Browse the repository at this point in the history
  • Loading branch information
turboMaCk committed Sep 3, 2023
1 parent bbf0b7a commit 86202eb
Showing 1 changed file with 2 additions and 2 deletions.
4 changes: 2 additions & 2 deletions lib/Data/Aeson/Combinators/Decode.hs
Expand Up @@ -94,7 +94,7 @@ module Data.Aeson.Combinators.Decode (
) where

import Prelude hiding (either, fail, maybe)
import qualified Prelude (either)
import qualified Prelude (either, maybe)

import Control.Applicative
import Control.Monad hiding (void)
Expand Down Expand Up @@ -437,7 +437,7 @@ key t (Decoder d) = Decoder $ \case
-- Just (Just 42)
maybeKey :: Key -> Decoder a -> Decoder (Maybe a)
maybeKey t (Decoder d) = Decoder $ \case
Object v -> (v .:? t) >>= maybe (pure Nothing) (fmap Just . d)
Object v -> (v .:? t) >>= Prelude.maybe (pure Nothing) (fmap Just . d)
val -> typeMismatch "Object" val
{-# INLINE maybeKey #-}

Expand Down

0 comments on commit 86202eb

Please sign in to comment.