aboutsummaryrefslogtreecommitdiff
path: root/pandoc-cli/src
diff options
context:
space:
mode:
authorAlbert Krewinkel <[email protected]>2022-09-27 11:49:29 +0200
committerJohn MacFarlane <[email protected]>2022-09-27 08:42:27 -0700
commita3fd6c674d233f949f070ff10c131f3713b78b4e (patch)
treec574d82f382d2e2e11eefcde4e0b731ab6c8e54d /pandoc-cli/src
parent2bad9a9aa4eeb6cd63eef53422751ce5fd307c6b (diff)
pandoc-cli: update to hslua-cli-1.2
Diffstat (limited to 'pandoc-cli/src')
-rw-r--r--pandoc-cli/src/pandoc.hs8
1 files changed, 5 insertions, 3 deletions
diff --git a/pandoc-cli/src/pandoc.hs b/pandoc-cli/src/pandoc.hs
index 4564aa619..ca39b316f 100644
--- a/pandoc-cli/src/pandoc.hs
+++ b/pandoc-cli/src/pandoc.hs
@@ -39,9 +39,11 @@ main = E.handle (handleError . Left) $ do
-- | Runs pandoc as a Lua interpreter that is (mostly) compatible with
-- the default @lua@ program shipping with Lua.
runLuaInterpreter :: String -> [String] -> IO ()
-runLuaInterpreter _progName _args = do
+runLuaInterpreter progName args = do
let settings = Settings
{ settingsVersionInfo = "\nEmbedded in pandoc " <> pandocVersion
- , settingsRunner = handleError <=< runIOorExplode . runLua
+ , settingsRunner = runner
}
- runStandalone settings
+ runStandalone settings progName args
+ where
+ runner _envBehavior = handleError <=< runIOorExplode . runLua