@@ -1439,7 +1439,8 @@ convertWithOpts opts args = do
14391439 mapM_ (warn . ("Ignoring: " ++)) xs
14401440 liftIO $ B.readFile x
14411441
1442− let runIO' f = do
1442+ let runIO' :: PandocIO a -> IO a
1443+ runIO' f = do
14431444 (res, warnings) <- runIOorExplode $ do
14441445 x <- f
14451446 ws <- getWarnings