Fix typst reader for new typst-hs version.

This commit is contained in:
John MacFarlane
2023-06-30 13:30:05 -07:00
parent 43550ebace
commit 26a90162f0
+1 -1
View File
@@ -59,7 +59,7 @@ readTypst _opts inp = do
case parseTypst inputName (sourcesToText sources) of
Left e -> throwError $ PandocParseError $ T.pack $ show e
Right parsed ->
evaluateTypst readFileStrict inputName parsed >>=
evaluateTypst readFileStrict getCurrentTime inputName parsed >>=
either (throwError . PandocParseError . T.pack . show) pure >>=
runParserT pPandoc () inputName . F.toList >>=
either (throwError . PandocParseError . T.pack . show) pure