git.iko.soy/typeable/pandoc
on master help sign in
Text.Pandoc.App: set resource path at the beginning...
984a82aJohn MacFarlane
src/Text/Pandoc/App.hs+2−1
@@ -125,6 +125,8 @@ convertWithOpts opts = do
125
125
126 runIO' $ do
126 runIO' $ do
127 setUserDataDir datadir
127 setUserDataDir datadir
128+ setResourcePath (optResourcePath opts)
129+
128 setInputFiles (fromMaybe ["-"] (optInputFiles opts))
130 setInputFiles (fromMaybe ["-"] (optInputFiles opts))
129 setOutputFile (optOutputFile opts)
131 setOutputFile (optOutputFile opts)
130
132
@@ -268,7 +270,6 @@ convertWithOpts opts = do
268 writerName == "markdown_github") $
270 writerName == "markdown_github") $
269 report $ Deprecated "markdown_github" "Use gfm instead."
271 report $ Deprecated "markdown_github" "Use gfm instead."
270
272
271− setResourcePath (optResourcePath opts)
272 mapM_ (uncurry setRequestHeader) (optRequestHeaders opts)
273 mapM_ (uncurry setRequestHeader) (optRequestHeaders opts)
273
274
274 doc <- sourceToDoc sources >>=
275 doc <- sourceToDoc sources >>=