aboutsummaryrefslogtreecommitdiff
path: root/src/Text
diff options
context:
space:
mode:
authorJohn MacFarlane <jgm@berkeley.edu>2014-08-04 21:59:58 -0700
committerJohn MacFarlane <jgm@berkeley.edu>2014-08-04 21:59:58 -0700
commit39b59b7603c1e183dd20bb062b6279c2acc4ebd5 (patch)
tree172b9702814760ca647291ac87f1a9ccbb4156ec /src/Text
parentd71b013841f3c9c8c595591e312a31df16a728cb (diff)
parent3a411c3307482d5f13c1820bb8f39203175853fb (diff)
downloadpandoc-39b59b7603c1e183dd20bb062b6279c2acc4ebd5.tar.gz
Merge pull request #1476 from jkr/endnote-fix
Docx Parser: Produce endnotes.
Diffstat (limited to 'src/Text')
-rw-r--r--src/Text/Pandoc/Readers/Docx/Parse.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Text/Pandoc/Readers/Docx/Parse.hs b/src/Text/Pandoc/Readers/Docx/Parse.hs
index 71938afe0..cc93bc9ed 100644
--- a/src/Text/Pandoc/Readers/Docx/Parse.hs
+++ b/src/Text/Pandoc/Readers/Docx/Parse.hs
@@ -857,8 +857,8 @@ elemToRun ns element
notes <- asks envNotes
case lookupEndnote enId notes of
Just e -> do bps <- mapD (elemToBodyPart ns) (elChildren e)
- return $ Footnote bps
- Nothing -> return $ Footnote []
+ return $ Endnote bps
+ Nothing -> return $ Endnote []
elemToRun ns element
| isElem ns "w" "r" element = do
runElems <- elemToRunElems ns element