diff options
Diffstat (limited to 'src/Zettel/Render.hs')
-rw-r--r-- | src/Zettel/Render.hs | 16 |
1 files changed, 9 insertions, 7 deletions
diff --git a/src/Zettel/Render.hs b/src/Zettel/Render.hs index 276ea9b..28d6923 100644 --- a/src/Zettel/Render.hs +++ b/src/Zettel/Render.hs @@ -2,21 +2,20 @@ module Zettel.Render where -import Control.Monad as M (when) import Data.Default (def) import qualified Data.Map.Strict as Map import qualified Data.Text as T import Paths_org_zk (getDataFileName) import Text.Pandoc.App (applyFilters) -import Text.Pandoc.Builder (HasMeta (..), ToMetaValue (..)) +import Text.Pandoc.Builder (HasMeta (..)) import Text.Pandoc.Class (runIOorExplode) import Text.Pandoc.Definition (Block (..), Inline (..)) -import Text.Pandoc.Extensions (Extension (..), disableExtension, enableExtension) +import Text.Pandoc.Extensions (Extension (..), disableExtension) import Text.Pandoc.Filter (Environment (..), Filter (..)) -import Text.Pandoc.Options (CiteMethod (..), ReaderOptions (..), WriterOptions (..), getDefaultExtensions, multimarkdownExtensions) +import Text.Pandoc.Options (ReaderOptions (..), WriterOptions (..), getDefaultExtensions, multimarkdownExtensions) import Text.Pandoc.Scripting (noEngine) import Text.Pandoc.Templates (WithDefaultPartials (..), compileTemplate) -import Text.Pandoc.Walk (query, walk) +import Text.Pandoc.Walk (query) import Text.Pandoc.Writers (writeMarkdown) import Zettel.Types @@ -62,10 +61,10 @@ renderZettel _ zettel = do if unMB $ query checkCitation zettel.zettelBody then let pandoc = - setMeta "csl" ("/Users/ymherklotz/Dropbox/zk/assets/ieee.csl" :: FilePath) $ + setMeta "csl" ("/home/ymherklotz/Dropbox/zk/assets/ieee.csl" :: FilePath) $ setMeta "bibliography" - (["/Users/ymherklotz/bibliography/references.bib"] :: [FilePath]) + (["/home/ymherklotz/bibliography/references.bib"] :: [FilePath]) zettel.zettelBody in applyFilters noEngine @@ -73,6 +72,9 @@ renderZettel _ zettel = do def {readerExtensions = getDefaultExtensions "org"} writeOpts { writerExtensions = + -- Counter-intuitively, you need to disable citation + -- support so that the citations are inserted in the + -- markdown directly, instead of just referenced. disableExtension Ext_citations writeOpts.writerExtensions } ) |