{-# LANGUAGE OverloadedStrings #-}

module Data.Morpheus.Error.Mutation
  ( mutationIsNotDefined
  ) where

import           Data.Morpheus.Error.Utils               (errorMessage)
import           Data.Morpheus.Types.Internal.Base       (Position)
import           Data.Morpheus.Types.Internal.Validation (GQLErrors)

mutationIsNotDefined :: Position -> GQLErrors
mutationIsNotDefined position' =
  errorMessage position' "Schema is not configured for mutations."