From 5c7ad59ffe7c4e6aec62d16611ccb84a9ce02472 Mon Sep 17 00:00:00 2001 From: Alexander Krotov Date: Sat, 11 May 2019 13:35:03 +0300 Subject: [PATCH] FB2 reader: add notes parsing test --- test/Tests/Readers/FB2.hs | 1 + test/fb2/reader/notes.fb2 | 19 +++++++++++++++++++ test/fb2/reader/notes.native | 4 ++++ 3 files changed, 24 insertions(+) create mode 100644 test/fb2/reader/notes.fb2 create mode 100644 test/fb2/reader/notes.native diff --git a/test/Tests/Readers/FB2.hs b/test/Tests/Readers/FB2.hs index 71443176d..e64e8a2ce 100644 --- a/test/Tests/Readers/FB2.hs +++ b/test/Tests/Readers/FB2.hs @@ -36,4 +36,5 @@ tests = [ fb2Test "Emphasis" "fb2/reader/emphasis.fb2" , fb2Test "Epigraph" "fb2/reader/epigraph.fb2" , fb2Test "Poem" "fb2/reader/poem.fb2" , fb2Test "Meta" "fb2/reader/meta.fb2" + , fb2Test "Notes" "fb2/reader/notes.fb2" ] diff --git a/test/fb2/reader/notes.fb2 b/test/fb2/reader/notes.fb2 new file mode 100644 index 000000000..263256933 --- /dev/null +++ b/test/fb2/reader/notes.fb2 @@ -0,0 +1,19 @@ + + + +
+

Note 1.

+

Second note 2.

+
+ + +
+ <p>1</p> +

Note contents

+
+
+ <p>2</p> +

Second note contents.

+
+ +
diff --git a/test/fb2/reader/notes.native b/test/fb2/reader/notes.native new file mode 100644 index 000000000..f229209cd --- /dev/null +++ b/test/fb2/reader/notes.native @@ -0,0 +1,4 @@ +Pandoc (Meta {unMeta = fromList []}) +[Div ("",["section"],[]) + [Para [Str "Note",Space,Note [Para [Str "Note",Space,Str "contents"]],Str "."] + ,Para [Str "Second",Space,Str "note",Space,Note [Para [Str "Second",Space,Str "note",Space,Str "contents."]],Str "."]]]