Fix reporting of parse errors in notebook

google-research · Jan 11, 2024 · 25e2e38 · 25e2e38
1 parent 87f7b71
commit 25e2e38
Showing 1 changed file with 3 additions and 0 deletions.
diff --git a/src/lib/RenderHtml.hs b/src/lib/RenderHtml.hs
@@ -196,6 +196,9 @@ renderSourceBlock n b = RenderedSourceBlock
   , rsbText = T.unpack $ sbText b
   , rsbHtml = renderHtml case sbContents b of
       Misc (ProseBlock s) -> cdiv "prose-block" $ mdToHtml s
+      UnParseable _ e -> do
+        cdiv "code-block" (toHtml $ sbText b)
+        cdiv "err-result" (toHtml e)
       _ -> renderSpans n (sbLexemeInfo b) (sbText b)
   }