git.iko.soy/typeable/pandoc
on master help sign in
Added a type signature
49502b9John MacFarlane
pandoc.hs+2−1
compare with master
unifiedsplit
@@ -1439,7 +1439,8 @@ convertWithOpts opts args = do
1439 mapM_ (warn . ("Ignoring: " ++)) xs
1439 mapM_ (warn . ("Ignoring: " ++)) xs
1440 liftIO $ B.readFile x
1440 liftIO $ B.readFile x
1441
1441
1442− let runIO' f = do
1442+ let runIO' :: PandocIO a -> IO a
1443+ runIO' f = do
1443 (res, warnings) <- runIOorExplode $ do
1444 (res, warnings) <- runIOorExplode $ do
1444 x <- f
1445 x <- f
1445 ws <- getWarnings
1446 ws <- getWarnings