From a840e41fad2081245677a1eb1b1c7dc83d24df4c Mon Sep 17 00:00:00 2001 From: hubertp-lshift Date: Tue, 13 Dec 2016 17:20:10 +0100 Subject: Test case for issue #3223 (#3308) --- tests/Tests/Readers/Odt.hs | 1 + tests/odt/native/textMixedStyles.native | 5 +++++ tests/odt/odt/textMixedStyles.odt | Bin 0 -> 10571 bytes 3 files changed, 6 insertions(+) create mode 100644 tests/odt/native/textMixedStyles.native create mode 100644 tests/odt/odt/textMixedStyles.odt diff --git a/tests/Tests/Readers/Odt.hs b/tests/Tests/Readers/Odt.hs index 7070ff641..56711c76b 100644 --- a/tests/Tests/Readers/Odt.hs +++ b/tests/Tests/Readers/Odt.hs @@ -159,6 +159,7 @@ namesOfTestsComparingToNative = [ "blockquote" , "simpleTable" , "simpleTableWithCaption" -- , "table" + , "textMixedStyles" , "tableWithContents" , "unicode" , "unorderedList" diff --git a/tests/odt/native/textMixedStyles.native b/tests/odt/native/textMixedStyles.native new file mode 100644 index 000000000..1347867c6 --- /dev/null +++ b/tests/odt/native/textMixedStyles.native @@ -0,0 +1,5 @@ +[Para [Str "This",Space,Str "is",Space,Str "a",Space,Str "simple",Space,Str "text"] +,Para [] +,Para [Str "that",Space,Str "is",Space,Str "both",Space,Emph [Str "italic",Space],Strong [Str "bold",Space],Emph [Str "underlined",Space],Str "and",Space,Str "the",Space,Emph [Strong [Str "first",Space,Str "two"]],Space,Str "and",Space,Str "the",Space,Emph [Strong [Str "last",Space,Str "two",Space]],Space,Str "and",Space,Strong [Strikeout [Str "bold",Space,Str "and",Space,Str "line",Space,Str "through"]]] +,Para [] +,Para [Str "And",Space,Str "with",Space,Superscript [Emph [Str "superscripts"]]]] diff --git a/tests/odt/odt/textMixedStyles.odt b/tests/odt/odt/textMixedStyles.odt new file mode 100644 index 000000000..382b338ad Binary files /dev/null and b/tests/odt/odt/textMixedStyles.odt differ -- cgit v1.2.3