diff options
Diffstat (limited to 'app/SlackBuilder/Updater.hs')
| -rw-r--r-- | app/SlackBuilder/Updater.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/app/SlackBuilder/Updater.hs b/app/SlackBuilder/Updater.hs index 7965a5c..6663bb7 100644 --- a/app/SlackBuilder/Updater.hs +++ b/app/SlackBuilder/Updater.hs @@ -36,7 +36,7 @@ import SlackBuilder.CommandLine import SlackBuilder.Trans import qualified Data.Aeson.KeyMap as KeyMap import GHC.Records (HasField(..)) -import Control.Monad.Trans.Reader (ReaderT(..), asks) +import Control.Monad.Trans.Reader (asks) import Control.Monad.IO.Class (MonadIO(..)) newtype PackagistPackage = PackagistPackage @@ -77,7 +77,7 @@ instance Aeson.FromJSON GhData where parseJSON (Aeson.Object keyMap) | Just data' <- KeyMap.lookup "data" keyMap = GhData <$> Aeson.withObject "GhData" (.: "repository") data' - parseJSON v = fail "data key not found in the response" + parseJSON _ = fail "data key not found in the response" data GhVariables = GhVariables { name :: Text |