diff options
author | John MacFarlane <jgm@berkeley.edu> | 2017-03-26 20:48:17 +0200 |
---|---|---|
committer | John MacFarlane <jgm@berkeley.edu> | 2017-03-26 20:48:17 +0200 |
commit | 1fa15c225b515e1fa1c6566f90f1be363a4d770f (patch) | |
tree | 9d0037db4ed5b68e65ba5e55f85e1533e2287d55 /src/Text/Pandoc | |
parent | d0447151cf48d8da5fe251e4d3eb6a4fd0f05490 (diff) | |
download | pandoc-1fa15c225b515e1fa1c6566f90f1be363a4d770f.tar.gz |
Revert "Use file-embed instead of hsb2hs to embed data files."
This reverts commit 10d91c147968d2e4d63b99b5b0342624827f416f.
Diffstat (limited to 'src/Text/Pandoc')
-rw-r--r-- | src/Text/Pandoc/Data.hsb (renamed from src/Text/Pandoc/Data.hs) | 9 |
1 files changed, 4 insertions, 5 deletions
diff --git a/src/Text/Pandoc/Data.hs b/src/Text/Pandoc/Data.hsb index df26f5412..02c109816 100644 --- a/src/Text/Pandoc/Data.hs +++ b/src/Text/Pandoc/Data.hsb @@ -1,8 +1,6 @@ -{-# LANGUAGE TemplateHaskell #-} - +{-# LANGUAGE OverloadedStrings #-} +-- to be processed using hsb2hs module Text.Pandoc.Data (dataFiles) where - -import Data.FileEmbed import qualified Data.ByteString as B import System.FilePath (splitDirectories) import qualified System.FilePath.Posix as Posix @@ -14,4 +12,5 @@ dataFiles = map (\(fp, contents) -> (Posix.joinPath (splitDirectories fp), contents)) dataFiles' dataFiles' :: [(FilePath, B.ByteString)] -dataFiles' = ("MANUAL.txt", $(embedFile "MANUAL.txt")) : $(embedDir "data") +dataFiles' = ("MANUAL.txt", %blob "MANUAL.txt") : %blobs "data" + |