diff options
author | John MacFarlane <jgm@berkeley.edu> | 2017-01-27 21:36:45 +0100 |
---|---|---|
committer | John MacFarlane <jgm@berkeley.edu> | 2017-01-27 21:36:45 +0100 |
commit | 5156a4fe3c2438eeb0caa4a85e8adfdbea94e59d (patch) | |
tree | a8ab96c235a0b59e40ddf737a20648eb6ae04946 /src/Text/Pandoc/Readers/Odt/ContentReader.hs | |
parent | 56f74cb0abdcf991f26b7456ed69d99e1993d0ab (diff) | |
download | pandoc-5156a4fe3c2438eeb0caa4a85e8adfdbea94e59d.tar.gz |
Shared: rename compactify', compactify'DL -> compactify, compactifyDL.
Diffstat (limited to 'src/Text/Pandoc/Readers/Odt/ContentReader.hs')
-rw-r--r-- | src/Text/Pandoc/Readers/Odt/ContentReader.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Text/Pandoc/Readers/Odt/ContentReader.hs b/src/Text/Pandoc/Readers/Odt/ContentReader.hs index 2672b01ef..a1bd8cb59 100644 --- a/src/Text/Pandoc/Readers/Odt/ContentReader.hs +++ b/src/Text/Pandoc/Readers/Odt/ContentReader.hs @@ -663,7 +663,7 @@ read_list = matchingElement NsText "list" -- read_list_item :: ElementMatcher [Blocks] read_list_item = matchingElement NsText "list-item" - $ liftA (compactify'.(:[])) + $ liftA (compactify.(:[])) ( matchChildContent' [ read_paragraph , read_header , read_list @@ -749,7 +749,7 @@ read_table_row = matchingElement NsTable "table-row" -- read_table_cell :: ElementMatcher [Blocks] read_table_cell = matchingElement NsTable "table-cell" - $ liftA (compactify'.(:[])) + $ liftA (compactify.(:[])) $ matchChildContent' [ read_paragraph ] |