diff options
| -rw-r--r-- | src/Text/Pandoc/Writers/ODT.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Text/Pandoc/Writers/ODT.hs b/src/Text/Pandoc/Writers/ODT.hs index f8096d27d..a03575134 100644 --- a/src/Text/Pandoc/Writers/ODT.hs +++ b/src/Text/Pandoc/Writers/ODT.hs @@ -130,8 +130,8 @@ pandocToODT opts doc@(Pandoc meta _) = do let escapedText = text . escapeStringForXML let userDefinedMeta = map (\k -> inTags False "meta:user-defined" - [ ("meta_name", escapeStringForXML k) - ,("meta-value-type", "string") + [ ("meta:name", escapeStringForXML k) + ,("meta:value-type", "string") ] (escapedText $ lookupMetaString k meta)) userDefinedMetaFields let metaTag metafield = inTagsSimple metafield . escapedText let metaEntry = toEntry "meta.xml" epochtime |