diff --git a/CHANGELOG.md b/CHANGELOG.md index e4ee506..12d0740 100644 --- a/CHANGELOG.md +++ b/CHANGELOG.md @@ -1,5 +1,9 @@ # Change Log for rib +## UNRELEASED + +- Removed pandoc-include-code + ## 0.10.0.0 - API diff --git a/rib.cabal b/rib.cabal index 65170aa..eb9ed95 100644 --- a/rib.cabal +++ b/rib.cabal @@ -51,7 +51,6 @@ common library-common mtl >=2.2.2 && <2.3, optparse-applicative >= 0.15, pandoc >=2.7 && <3, - pandoc-include-code >=1.5 && <1.6, pandoc-types >=1.20, relude >= 0.6 && < 0.7, safe-exceptions, diff --git a/src/Rib/Parser/Pandoc.hs b/src/Rib/Parser/Pandoc.hs index 48b395b..db6713f 100644 --- a/src/Rib/Parser/Pandoc.hs +++ b/src/Rib/Parser/Pandoc.hs @@ -3,8 +3,6 @@ {-# LANGUAGE OverloadedStrings #-} {-# LANGUAGE Rank2Types #-} {-# LANGUAGE ScopedTypeVariables #-} -{-# LANGUAGE TypeApplications #-} -{-# LANGUAGE ViewPatterns #-} -- | Helpers for working with Pandoc documents module Rib.Parser.Pandoc @@ -36,7 +34,6 @@ import Relude import Rib.Shake (ribInputDir) import System.FilePath import Text.Pandoc -import Text.Pandoc.Filter.IncludeCode (includeCode) import qualified Text.Pandoc.Readers import Text.Pandoc.Walk (query, walkM) import Text.Pandoc.Writers.Shared (toTableOfContents) @@ -61,10 +58,7 @@ parse textReader f = inputDir <- ribInputDir content <- toText <$> readFile' (inputDir f) fmap (first show) $ runExceptT $ do - v' <- runIO' $ textReader readerSettings content - liftIO $ walkM includeSources v' - where - includeSources = includeCode $ Just $ Format "html5" + runIO' $ textReader readerSettings content -- | Render a Pandoc document to HTML render :: Monad m => Pandoc -> HtmlT m ()