~ubuntu-branches/ubuntu/saucy/pandoc/saucy-proposed

« back to all changes in this revision

Viewing changes to src/Text/Pandoc/Writers/ODT.hs

Committer: Package Import Robot
Author(s): Joachim Breitner
Date: 2013-05-25 00:41:12 UTC
mfrom: (3.1.18 sid)
Revision ID: package-import@ubuntu.com-20130525004112-7kun3p25zx2hibxs

Tags: 1.11.1-2

Upload to unstable

files modified:
COPYING

README

changelog

data/epub.css

data/reference.docx

data/templates/default.beamer

data/templates/default.context

data/templates/default.latex

debian/README.source

debian/changelog

debian/control

debian/copyright_hints

debian/rules

dist/build/Text/Pandoc/Data.hs

man/man1/pandoc.1

man/man5/pandoc_markdown.5

pandoc.cabal

pandoc.hs

src/Text/Pandoc.hs

src/Text/Pandoc/Highlighting.hs

src/Text/Pandoc/ImageSize.hs

src/Text/Pandoc/Options.hs

src/Text/Pandoc/Parsing.hs

src/Text/Pandoc/Pretty.hs

src/Text/Pandoc/Readers/HTML.hs

src/Text/Pandoc/Readers/LaTeX.hs

src/Text/Pandoc/Readers/Markdown.hs

src/Text/Pandoc/Readers/RST.hs

src/Text/Pandoc/Readers/Textile.hs

src/Text/Pandoc/Shared.hs

src/Text/Pandoc/UTF8.hs

src/Text/Pandoc/Writers/ConTeXt.hs

src/Text/Pandoc/Writers/Docbook.hs

src/Text/Pandoc/Writers/Docx.hs

src/Text/Pandoc/Writers/EPUB.hs

src/Text/Pandoc/Writers/HTML.hs

src/Text/Pandoc/Writers/LaTeX.hs

src/Text/Pandoc/Writers/Markdown.hs

src/Text/Pandoc/Writers/ODT.hs

src/Text/Pandoc/Writers/RST.hs

src/Text/Pandoc/Writers/Textile.hs

tests/Tests/Old.hs

tests/Tests/Writers/HTML.hs

tests/lhs-test.html+lhs

tests/lhs-test.latex

tests/lhs-test.latex+lhs

tests/markdown-reader-more.native

tests/markdown-reader-more.txt

tests/pipe-tables.txt

tests/s5.basic.html

tests/s5.fancy.html

tests/textile-reader.native

tests/textile-reader.textile

tests/writer.latex

Show diffs side-by-side

added added

removed removed

src/Text/Pandoc/Writers/ODT.hs

]

let files = [ ent | ent <- filesInArchive archive, not ("META-INF" `isPrefixOf` ent) ]

let manifestEntry = toEntry "META-INF/manifest.xml" epochtime

$ fromStringLazy $ show

$ fromStringLazy $ render Nothing

$ text "<?xml version=\"1.0\" encoding=\"utf-8\"?>"

( inTags True "manifest:manifest"

)

let archive' = addEntryToArchive manifestEntry archive

let metaEntry = toEntry "meta.xml" epochtime

$ fromStringLazy $ show

$ fromStringLazy $ render Nothing

$ text "<?xml version=\"1.0\" encoding=\"utf-8\"?>"

( inTags True "office:document-meta"

Older »