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 /tests | |
| parent | 56f74cb0abdcf991f26b7456ed69d99e1993d0ab (diff) | |
| download | pandoc-5156a4fe3c2438eeb0caa4a85e8adfdbea94e59d.tar.gz | |
Shared: rename compactify', compactify'DL -> compactify, compactifyDL.
Diffstat (limited to 'tests')
| -rw-r--r-- | tests/Tests/Shared.hs | 8 |
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 ] |