{-# LANGUAGE OverloadedStrings #-} {-# LANGUAGE TupleSections #-} module Hakyll.Web.Template.DirList ( Configuration (..) , defaultConfiguration , metadataConfiguration , dirListField ) where --import Data.Monoid (mappend) import Control.Monad (liftM) import Data.List (sortBy) import Data.Ord (comparing) import Hakyll ( MonadMetadata, Identifier , Item, itemIdentifier, field , getMetadata, lookupString, listField , toFilePath, Metadata, Compiler, Context , splitAll) import System.FilePath ( dropExtensions , splitDirectories , takeBaseName) import Data.Maybe ( fromMaybe) import qualified Data.Map as M import Data.Default (Default (..)) -- | Configuration for allowing variation of collection and -- item tags in dependency of the hierarchical directory level. -- The level count begins with zero. data Configuration = Configuration { -- | begin of item tag, default returns '