Tissevert/pandoc
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions 1

Docx reader: tests for removing unused anchors.

Browse source
This commit is contained in:
Jesse Rosenthal 2017-12-30 22:43:33 -05:00
parent e90c714c73
commit 475b0dcb66
3 changed files with 7 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
test/Tests/Readers/Docx.hs
View file

@ -175,6 +175,10 @@ tests = [ testGroup "inlines"
"inlines inside of Structured Document Tags"
"docx/sdt_elements.docx"
"docx/sdt_elements.native"
, testCompare
"remove anchor spans with nothing pointing to them"
"docx/unused_anchors.docx"
"docx/unused_anchors.native"
]
, testGroup "blocks"
[ testCompare

BIN
test/docx/unused_anchors.docx Normal file
View file

Binary file not shown.

3
test/docx/unused_anchors.native Normal file
View file

@ -0,0 +1,3 @@
[Header 1 ("my-section",[],[]) [Str "My",Space,Str "Section"]
,Para [Link ("",[],[]) [Str "Here",Space,Str "is",Space,Str "a",Space,Str "link."] ("#Bar","")]
,Para [Span ("Bar",["anchor"],[]) [],Str "Here",Space,Str "is",Space,Str "the",Space,Str "target."]]