diff options
Diffstat (limited to 'src/WWW')
| -rw-r--r-- | src/WWW/Base.hs | 3 | ||||
| -rw-r--r-- | src/WWW/Templates.hs | 33 |
2 files changed, 33 insertions, 3 deletions
diff --git a/src/WWW/Base.hs b/src/WWW/Base.hs index 4f8d1c7..7c752da 100644 --- a/src/WWW/Base.hs +++ b/src/WWW/Base.hs @@ -10,9 +10,6 @@ import Hakyll import System.Process -hakyllVersion :: IsString s => s -hakyllVersion = "Hakyll 4.16.2.2" - -- | mathematicaster.org domain :: IsString s => s domain = "mathematicaster.org" diff --git a/src/WWW/Templates.hs b/src/WWW/Templates.hs new file mode 100644 index 0000000..0068a07 --- /dev/null +++ b/src/WWW/Templates.hs @@ -0,0 +1,33 @@ +{-# LANGUAGE TemplateHaskell #-} +module WWW.Templates + ( defaultTemplate + , navigationTemplate + , mathTemplate + , tikzTemplate + -- * Context + , myContext + ) where + +import Prolog + +import Hakyll + +import Hakyll.TeX.TikZ (tikzTemplate) + + +defaultTemplate :: Template +defaultTemplate = $(embedTemplate "templates/default.html") + +navigationTemplate :: Template +navigationTemplate = $(embedTemplate "templates/nav.html") + +mathTemplate :: Template +mathTemplate = $(embedTemplate "templates/math.html") + + +myContext :: Context String +myContext = fold + [ constField "personalEmail" "chris@mathematicaster.org" + , constField "workEmail" "coc0014@auburn.edu" + , defaultContext + ] |