diff options
Diffstat (limited to 'Text')
| -rw-r--r-- | Text/Pandoc/ASCIIMathML.hs | 5 | ||||
| -rw-r--r-- | Text/Pandoc/ODT.hs | 2 |
2 files changed, 4 insertions, 3 deletions
diff --git a/Text/Pandoc/ASCIIMathML.hs b/Text/Pandoc/ASCIIMathML.hs index 2f634b0b0..72a1f0e19 100644 --- a/Text/Pandoc/ASCIIMathML.hs +++ b/Text/Pandoc/ASCIIMathML.hs @@ -3,9 +3,10 @@ -- (See <http://www1.chapman.edu/~jipsen/mathml/asciimath.html>.) module Text.Pandoc.ASCIIMathML ( asciiMathMLScript ) where import Text.Pandoc.Shared ( contentsOf ) +import System.FilePath ( (</>) ) -- | String containing ASCIIMathML javascript. asciiMathMLScript :: String asciiMathMLScript = "<script type=\"text/javascript\">\n" ++ - $(contentsOf $ "data/ASCIIMathML.js.comment") ++ - $(contentsOf $ "data/ASCIIMathML.js.packed") ++ "</script>\n" + $(contentsOf $ "data" </> "ASCIIMathML.js.comment") ++ + $(contentsOf $ "data" </> "ASCIIMathML.js.packed") ++ "</script>\n" diff --git a/Text/Pandoc/ODT.hs b/Text/Pandoc/ODT.hs index bb49792eb..6c0cca0a9 100644 --- a/Text/Pandoc/ODT.hs +++ b/Text/Pandoc/ODT.hs @@ -62,7 +62,7 @@ saveOpenDocumentAsODT destinationODTPath sourceDirRelative xml = do withTempDir "pandoc-odt" $ \tempDir -> do let tempODT = tempDir </> "reference.odt" copyFile "odt-styles/reference.odt" tempODT - B.writeFile tempODT $ B.pack $(contentsOf "odt-styles/reference.odt") + B.writeFile tempODT $ B.pack $(contentsOf $ "odt-styles" </> "reference.odt") createDirectory $ tempDir </> "Pictures" xml' <- handlePictures tempODT sourceDirRelative xml writeFile (tempDir </> "content.xml") xml' |