blob: 9b83c626c132feec42234ee68f0b91b87e5af439 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
|
module Hakyll.TeX.HaTeX
( hatexCompiler
, compileHatex
) where
import Prolog
import Hakyll
import Text.LaTeX.Base.Parser
compileHatex :: (StringConv s Text, Traversable t) => t s -> Compiler (t LaTeX)
compileHatex = traverse $ either (throwError . fmap messageString . errorMessages) pure . parseLaTeX . toSL
hatexCompiler :: Compiler (Item LaTeX)
hatexCompiler = getResourceLBS >>= compileHatex
|
