module Hakyll.Core.Configuration
( HakyllConfiguration (..)
, defaultHakyllConfiguration
) where
import System.FilePath (takeFileName)
import Data.List (isPrefixOf, isSuffixOf)
data HakyllConfiguration = HakyllConfiguration
{
destinationDirectory :: FilePath
,
storeDirectory :: FilePath
,
ignoreFile :: FilePath -> Bool
}
defaultHakyllConfiguration :: HakyllConfiguration
defaultHakyllConfiguration = HakyllConfiguration
{ destinationDirectory = "_site"
, storeDirectory = "_cache"
, ignoreFile = ignoreFile'
}
where
ignoreFile' path
| "." `isPrefixOf` fileName = True
| "~" `isSuffixOf` fileName = True
| ".swp" `isSuffixOf` fileName = True
| otherwise = False
where
fileName = takeFileName path