git.iko.soy/typeable/pandoc
on master help sign in
Docx reader: test for nested anchor spans in header

This ensures that anchor spans in header with content (or with other anchor spans inside) will resolve to links to a header id properly.

commitfcbb37c8f3b28ae0889041030f37e7c730751bcd authorJesse Rosenthal <jrosenthal@jhu.edu> dateMon 29 Aug 2016, 08:35 (10 years ago) parent95734b2
3 files changed+14
compare with master
unifiedsplit
tests/Tests/Readers/Docx.hs+4 tests/docx/nested_anchors_in_header.docx tests/docx/nested_anchors_in_header.native+10
tests/Tests/Readers/Docx.hs+4
@@ -181,6 +181,10 @@ tests = [ testGroup "inlines"
181181 "headers already having auto identifiers"
182182 "docx/already_auto_ident.docx"
183183 "docx/already_auto_ident.native"
184+ , testCompare
185+ "nested anchor spans in header"
186+ "docx/nested_anchors_in_header.docx"
187+ "docx/nested_anchors_in_header.native"
184188 , testCompare
185189 "single numbered item not made into list"
186190 "docx/numbered_header.docx"
tests/docx/nested_anchors_in_header.docxnew file

Binary file not shown.

tests/docx/nested_anchors_in_header.nativenew file+10
@@ -0,0 +1,10 @@
1+[Header 1 ("short-instructions",[],[]) [Str "Short",Space,Str "instructions"]
2+,Para [Link ("",[],[]) [Str "Open",Space,Str "remote",Space,Str "folder"] ("#remote-folder-or-longlonglonglonglong-file-with-manymanymanymany-letters-inside-opening","")]
3+,Para [Str "Do",Space,Str "staff"]
4+,Para [Link ("",[],[]) [Str "Close",Space,Str "remote",Space,Str "folder"] ("#remote-folder-or-longlonglonglonglong-file-with-manymanymanymany-letters-inside-closing","")]
5+,Header 1 ("some-instructions",[],[]) [Str "Some",Space,Str "instructions"]
6+,Para [Str "Lines"]
7+,Header 2 ("remote-folder-or-longlonglonglonglong-file-with-manymanymanymany-letters-inside-opening",[],[]) [Str "Remote",Space,Str "folder",Space,Str "or",Space,Str "longlonglonglonglong",Space,Str "file",Space,Str "with",Space,Str "manymanymanymany",Space,Str "letters",Space,Str "inside",Space,Str "opening"]
8+,Para [Str "Open",Space,Str "folder"]
9+,Header 2 ("remote-folder-or-longlonglonglonglong-file-with-manymanymanymany-letters-inside-closing",[],[]) [Str "Remote",Space,Str "folder",Space,Str "or",Space,Str "longlonglonglonglong",Space,Str "file",Space,Str "with",Space,Str "manymanymanymany",Space,Str "letters",Space,Str "inside",Space,Str "closing"]
10+,Para [Str "Close",Space,Str "folder"]]