blob: c71ad093f868646eeff924c727c15eb05e388f12 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
|
module Hakyll.TeX.HaTeX
( hatexCompiler
, compileHatex
) where
import Prolog
import Hakyll
import Hakyll.Error
-- import Hakyll.Parsec.Parsec
import Text.LaTeX.Base.Parser
compileHatex :: (StringConv s Text, Traversable t, MonadError [String] m) => t s -> m (t LaTeX)
compileHatex = traverse $ liftErr . parseLaTeX . toSL
hatexCompiler :: Compiler (Item LaTeX)
hatexCompiler = getResourceLBS >>= compileHatex
|
