diff options
| author | John MacFarlane <fiddlosopher@gmail.com> | 2013-01-06 19:07:35 -0800 |
|---|---|---|
| committer | John MacFarlane <fiddlosopher@gmail.com> | 2013-01-06 19:07:35 -0800 |
| commit | 4d1c82de9e0ce213e6c32cd798549c4ddaf9d197 (patch) | |
| tree | 9693f02481ff97b4e14b3515a66d25b16c89ba73 /src | |
| parent | 73f464b8cdfe48d599068d5cacfa10997f9da93a (diff) | |
| download | pandoc-4d1c82de9e0ce213e6c32cd798549c4ddaf9d197.tar.gz | |
Docx writer: Use rIdNN identifiers for r:embed in images.
Diffstat (limited to 'src')
| -rw-r--r-- | src/Text/Pandoc/Writers/Docx.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Writers/Docx.hs b/src/Text/Pandoc/Writers/Docx.hs index 9d160598f..069a5f6eb 100644 --- a/src/Text/Pandoc/Writers/Docx.hs +++ b/src/Text/Pandoc/Writers/Docx.hs @@ -629,7 +629,7 @@ inlineToOpenXML opts (Image alt (src, tit)) = do Just (i,img) -> return (i, imageSize img) Nothing -> do img <- liftIO $ B.readFile src - ident' <- getUniqueId + ident' <- ("rId"++) `fmap` getUniqueId let size' = imageSize img modify $ \st -> st{ stImages = M.insert src (ident',img) $ stImages st } |