diff options
| author | John MacFarlane <jgm@berkeley.edu> | 2014-09-27 16:21:17 -0700 |
|---|---|---|
| committer | John MacFarlane <jgm@berkeley.edu> | 2014-09-27 16:21:17 -0700 |
| commit | fe6d43b3e0c3d7c9f4742873e33e54237f4efe9f (patch) | |
| tree | 633d2867ff088e5811d652a208fb03ddb534efce /src | |
| parent | 9c4e33f085c40a4cbf221c5b76830fcf062880a2 (diff) | |
| parent | a6eead7f261ed47269e7f7e45b5774d8620e602b (diff) | |
| download | pandoc-fe6d43b3e0c3d7c9f4742873e33e54237f4efe9f.tar.gz | |
Merge pull request #1601 from jkr/windowsfix
Fix path-slashes inside archive for windows
Diffstat (limited to 'src')
| -rw-r--r-- | src/Text/Pandoc/Readers/Docx/Parse.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Readers/Docx/Parse.hs b/src/Text/Pandoc/Readers/Docx/Parse.hs index e7a6c3ffb..2945a1eda 100644 --- a/src/Text/Pandoc/Readers/Docx/Parse.hs +++ b/src/Text/Pandoc/Readers/Docx/Parse.hs @@ -584,7 +584,7 @@ expandDrawingId s = do target <- asks (lookupRelationship s . envRelationships) case target of Just filepath -> do - bytes <- asks (lookup (combine "word" filepath) . envMedia) + bytes <- asks (lookup ("word/" ++ filepath) . envMedia) case bytes of Just bs -> return (filepath, bs) Nothing -> throwError DocxError |