summaryrefslogtreecommitdiff
path: root/src/Site/Content.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/Site/Content.hs')
-rw-r--r--src/Site/Content.hs32
1 files changed, 32 insertions, 0 deletions
diff --git a/src/Site/Content.hs b/src/Site/Content.hs
new file mode 100644
index 0000000..2f82484
--- /dev/null
+++ b/src/Site/Content.hs
@@ -0,0 +1,32 @@
+{-# LANGUAGE TemplateHaskell #-}
+module Site.Content
+ ( Content(..)
+ , contentPattern
+ , contentPaths
+ , contentRoute
+ , contentContext
+ , contentTemplate
+ , contentIndexContext
+ , contentIndexTemplate
+ )
+where
+
+import Control.Lens
+import Hakyll ( Pattern
+ , Context
+ , Routes
+ , Identifier
+ )
+
+-- the information for a kind of content, e.g. notes
+data Content = Content {
+ _contentPattern :: Pattern
+ , _contentPaths :: [Identifier]
+ , _contentRoute :: Routes
+ , _contentContext :: Hakyll.Context String
+ , _contentTemplate :: String
+ , _contentIndexContext :: Hakyll.Context String
+ , _contentIndexTemplate :: String
+ }
+
+makeLenses ''Content