summaryrefslogtreecommitdiff
path: root/tests/Tests/Shared.hs
diff options
context:
space:
mode:
authorJohn MacFarlane <jgm@berkeley.edu>2017-01-27 21:36:45 +0100
committerJohn MacFarlane <jgm@berkeley.edu>2017-01-27 21:36:45 +0100
commit5156a4fe3c2438eeb0caa4a85e8adfdbea94e59d (patch)
treea8ab96c235a0b59e40ddf737a20648eb6ae04946 /tests/Tests/Shared.hs
parent56f74cb0abdcf991f26b7456ed69d99e1993d0ab (diff)
Shared: rename compactify', compactify'DL -> compactify, compactifyDL.
Diffstat (limited to 'tests/Tests/Shared.hs')
-rw-r--r--tests/Tests/Shared.hs8
1 files changed, 4 insertions, 4 deletions
diff --git a/tests/Tests/Shared.hs b/tests/Tests/Shared.hs
index 4ff1dc837..9b9aeb6a3 100644
--- a/tests/Tests/Shared.hs
+++ b/tests/Tests/Shared.hs
@@ -9,11 +9,11 @@ import Text.Pandoc.Builder
import System.FilePath.Posix (joinPath)
tests :: [Test]
-tests = [ testGroup "compactify'DL"
- [ testCase "compactify'DL with empty def" $
- assertBool "compactify'DL"
+tests = [ testGroup "compactifyDL"
+ [ testCase "compactifyDL with empty def" $
+ assertBool "compactifyDL"
(let x = [(str "word", [para (str "def"), mempty])]
- in compactify'DL x == x)
+ in compactifyDL x == x)
]
, testGroup "collapseFilePath" testCollapse
]