diff options
| author | Albert Krewinkel <[email protected]> | 2022-10-10 09:12:11 +0200 |
|---|---|---|
| committer | Albert Krewinkel <[email protected]> | 2022-10-10 09:13:09 +0200 |
| commit | 3e1d3b5e5efb269a75550f70156c722de3da56d0 (patch) | |
| tree | 3790e05989bd14044a7c807df1d5dee321e3a308 /src/Text/Pandoc/Scripting.hs | |
| parent | 5d858e4119af3154ad8682ffc331115a01428e4c (diff) | |
Lua: use `Reader` type for custom readers.
Diffstat (limited to 'src/Text/Pandoc/Scripting.hs')
| -rw-r--r-- | src/Text/Pandoc/Scripting.hs | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/Text/Pandoc/Scripting.hs b/src/Text/Pandoc/Scripting.hs index 17bc2f972..9df00a5cf 100644 --- a/src/Text/Pandoc/Scripting.hs +++ b/src/Text/Pandoc/Scripting.hs @@ -22,7 +22,7 @@ import Text.Pandoc.Definition (Pandoc) import Text.Pandoc.Class.PandocMonad (PandocMonad) import Text.Pandoc.Error (PandocError (PandocNoScriptingEngine)) import Text.Pandoc.Filter.Environment (Environment) -import Text.Pandoc.Options (ReaderOptions) +import Text.Pandoc.Readers (Reader) import Text.Pandoc.Sources (Sources) import Text.Pandoc.Writers (Writer) @@ -36,7 +36,7 @@ data ScriptingEngine = ScriptingEngine -- ^ Use the scripting engine to run a filter. , engineReadCustom :: forall m. (PandocMonad m, MonadIO m) - => FilePath -> ReaderOptions -> Sources -> m Pandoc + => FilePath -> m (Reader m) -- ^ Function to parse input into a 'Pandoc' document. , engineWriteCustom :: forall m. (PandocMonad m, MonadIO m) @@ -49,7 +49,7 @@ noEngine = ScriptingEngine { engineName = "none" , engineApplyFilter = \_env _args _fp _doc -> throwError PandocNoScriptingEngine - , engineReadCustom = \_fp _ropts _sources -> + , engineReadCustom = \_fp -> throwError PandocNoScriptingEngine , engineWriteCustom = \_fp -> throwError PandocNoScriptingEngine |
