diff options
| author | Albert Krewinkel <albert@zeitkraut.de> | 2018-10-27 09:38:28 +0200 |
|---|---|---|
| committer | John MacFarlane <jgm@berkeley.edu> | 2018-10-28 12:08:52 -0700 |
| commit | 8ef995cfc0f9f53444fedf517c05fe02cb6311e7 (patch) | |
| tree | 4f6b9b4662030bf9d061685328646def50164e6c /src/Text/Pandoc/Filter/JSON.hs | |
| parent | f6124213073cf162bd3cfa5e6d455807e8a502a9 (diff) | |
| download | pandoc-8ef995cfc0f9f53444fedf517c05fe02cb6311e7.tar.gz | |
T.P.Filter: centralize filter path expansion
Diffstat (limited to 'src/Text/Pandoc/Filter/JSON.hs')
| -rw-r--r-- | src/Text/Pandoc/Filter/JSON.hs | 5 |
1 files changed, 1 insertions, 4 deletions
diff --git a/src/Text/Pandoc/Filter/JSON.hs b/src/Text/Pandoc/Filter/JSON.hs index 97b291603..2846e42e2 100644 --- a/src/Text/Pandoc/Filter/JSON.hs +++ b/src/Text/Pandoc/Filter/JSON.hs @@ -44,7 +44,6 @@ import System.FilePath ((</>), takeExtension) import Text.Pandoc.Class (PandocIO) import Text.Pandoc.Error (PandocError (PandocFilterError)) import Text.Pandoc.Definition (Pandoc) -import Text.Pandoc.Filter.Path (expandFilterPath) import Text.Pandoc.Options (ReaderOptions) import Text.Pandoc.Process (pipeProcess) import Text.Pandoc.Shared (pandocVersion) @@ -56,9 +55,7 @@ apply :: ReaderOptions -> FilePath -> Pandoc -> PandocIO Pandoc -apply ropts args f d = do - f' <- expandFilterPath f - liftIO $ externalFilter ropts f' args d +apply ropts args f = liftIO . externalFilter ropts f args externalFilter :: MonadIO m => ReaderOptions -> FilePath -> [String] -> Pandoc -> m Pandoc |