diff options
| author | Chris Wells <chris@mathematicaster.org> | 2025-01-25 14:33:21 -0600 |
|---|---|---|
| committer | Chris Wells <chris@mathematicaster.org> | 2025-01-25 14:33:21 -0600 |
| commit | ca1d4d3d4371c8175ea6addb1ca1b09c3b56a7bb (patch) | |
| tree | babd478f4191655b2fa26f584c872fb909363ef1 /src/WWW | |
| parent | 39d9569a2561f8ea09170b4371deca130c1ebcf9 (diff) | |
| download | main-ca1d4d3d4371c8175ea6addb1ca1b09c3b56a7bb.tar main-ca1d4d3d4371c8175ea6addb1ca1b09c3b56a7bb.tar.gz main-ca1d4d3d4371c8175ea6addb1ca1b09c3b56a7bb.tar.bz2 main-ca1d4d3d4371c8175ea6addb1ca1b09c3b56a7bb.tar.lz main-ca1d4d3d4371c8175ea6addb1ca1b09c3b56a7bb.tar.xz main-ca1d4d3d4371c8175ea6addb1ca1b09c3b56a7bb.tar.zst main-ca1d4d3d4371c8175ea6addb1ca1b09c3b56a7bb.zip | |
Adding templates and cleaning up
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 + ] |