diff options
Diffstat (limited to 'pandoc-cli/src')
| -rw-r--r-- | pandoc-cli/src/pandoc.hs | 8 |
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 |