@@ -78,7 +78,7 @@ writeODT opts doc@(Pandoc (Meta title _ _) _) = do
7878 ]
7979 let files = [ ent | ent <- filesInArchive archive, not ("META-INF" `isPrefixOf` ent) ]
8080 let manifestEntry = toEntry "META-INF/manifest.xml" epochtime
81− $ fromStringLazy $ show
81+ $ fromStringLazy $ render Nothing
8282 $ text "<?xml version=\"1.0\" encoding=\"utf-8\"?>"
8383 $$
8484 ( inTags True "manifest:manifest"
@@ -92,7 +92,7 @@ writeODT opts doc@(Pandoc (Meta title _ _) _) = do
9292 )
9393 let archive' = addEntryToArchive manifestEntry archive
9494 let metaEntry = toEntry "meta.xml" epochtime
95− $ fromStringLazy $ show
95+ $ fromStringLazy $ render Nothing
9696 $ text "<?xml version=\"1.0\" encoding=\"utf-8\"?>"
9797 $$
9898 ( inTags True "office:document-meta"