on 1319bbf help sign in
hakyll/src/Hakyll/Core/Metadata.hs
24 lines 805 B history raw
1--------------------------------------------------------------------------------
2module Hakyll.Core.Metadata
3 ( Metadata
4 , MonadMetadata (..)
5 ) where
8--------------------------------------------------------------------------------
9import Data.Map (Map)
12--------------------------------------------------------------------------------
13import Hakyll.Core.Identifier
16--------------------------------------------------------------------------------
17type Metadata = Map String String
20--------------------------------------------------------------------------------
21class MonadMetadata m where
22 identifierMetadata :: Identifier a -> m Metadata
23 -- allMetadata :: m [(Resource, Metadata)]
24 -- patternMetadata :: Pattern a -> m [(Resource, Metadata)]