diff options
| -rw-r--r-- | lib/Hakyll/Core/Metadata.hs | 1 | ||||
| -rw-r--r-- | lib/Hakyll/Core/Rules/Internal.hs | 1 | ||||
| -rw-r--r-- | lib/Hakyll/Web/Template/Context.hs | 1 | ||||
| -rw-r--r-- | lib/Hakyll/Web/Template/List.hs | 1 |
4 files changed, 4 insertions, 0 deletions
diff --git a/lib/Hakyll/Core/Metadata.hs b/lib/Hakyll/Core/Metadata.hs index 9d99857..aafb88e 100644 --- a/lib/Hakyll/Core/Metadata.hs +++ b/lib/Hakyll/Core/Metadata.hs @@ -16,6 +16,7 @@ module Hakyll.Core.Metadata -------------------------------------------------------------------------------- import Control.Arrow (second) import Control.Monad (forM) +import Control.Monad.Fail (MonadFail) import Data.Binary (Binary (..), getWord8, putWord8, Get) import qualified Data.HashMap.Strict as HMS diff --git a/lib/Hakyll/Core/Rules/Internal.hs b/lib/Hakyll/Core/Rules/Internal.hs index 2617798..8c3c011 100644 --- a/lib/Hakyll/Core/Rules/Internal.hs +++ b/lib/Hakyll/Core/Rules/Internal.hs @@ -13,6 +13,7 @@ module Hakyll.Core.Rules.Internal -------------------------------------------------------------------------------- +import Control.Monad.Fail (MonadFail) import Control.Monad.Reader (ask) import Control.Monad.RWS (RWST, runRWST) import Control.Monad.Trans (liftIO) diff --git a/lib/Hakyll/Web/Template/Context.hs b/lib/Hakyll/Web/Template/Context.hs index c1a4f23..3f75466 100644 --- a/lib/Hakyll/Web/Template/Context.hs +++ b/lib/Hakyll/Web/Template/Context.hs @@ -54,6 +54,7 @@ module Hakyll.Web.Template.Context -------------------------------------------------------------------------------- import Control.Applicative (Alternative (..)) import Control.Monad (msum) +import Control.Monad.Fail (MonadFail) import Data.List (intercalate, tails) #if MIN_VERSION_base(4,9,0) import Data.Semigroup (Semigroup (..)) diff --git a/lib/Hakyll/Web/Template/List.hs b/lib/Hakyll/Web/Template/List.hs index db3fff1..458c4a7 100644 --- a/lib/Hakyll/Web/Template/List.hs +++ b/lib/Hakyll/Web/Template/List.hs @@ -20,6 +20,7 @@ module Hakyll.Web.Template.List -------------------------------------------------------------------------------- import Control.Monad (liftM) +import Control.Monad.Fail (MonadFail) import Data.List (intersperse, sortBy) import Data.Ord (comparing) import Data.Time.Locale.Compat (defaultTimeLocale) |