From 5c24e66c16b30c36b397eb6ddcdff1080f1cb0ee Mon Sep 17 00:00:00 2001 From: Jesse Rosenthal Date: Sat, 16 Apr 2016 08:39:25 -0400 Subject: Docx Reader: Tests for track-changes moving --- tests/Tests/Readers/Docx.hs | 12 ++++++++++++ 1 file changed, 12 insertions(+) (limited to 'tests/Tests') diff --git a/tests/Tests/Readers/Docx.hs b/tests/Tests/Readers/Docx.hs index e09d56529..aeb6bf939 100644 --- a/tests/Tests/Readers/Docx.hs +++ b/tests/Tests/Readers/Docx.hs @@ -266,6 +266,18 @@ tests = [ testGroup "inlines" "keep deletion (all)" "docx/track_changes_deletion.docx" "docx/track_changes_deletion_all.native" + , testCompareWithOpts def{readerTrackChanges=AcceptChanges} + "move text (accept)" + "docx/track_changes_move.docx" + "docx/track_changes_move_accept.native" + , testCompareWithOpts def{readerTrackChanges=RejectChanges} + "move text (reject)" + "docx/track_changes_move.docx" + "docx/track_changes_move_reject.native" + , testCompareWithOpts def{readerTrackChanges=AllChanges} + "move text (all)" + "docx/track_changes_move.docx" + "docx/track_changes_move_all.native" ] , testGroup "media" [ testMediaBag -- cgit v1.2.3