diff options
| author | John MacFarlane <jgm@berkeley.edu> | 2012-09-29 17:09:34 -0400 |
|---|---|---|
| committer | John MacFarlane <jgm@berkeley.edu> | 2012-09-29 17:09:34 -0400 |
| commit | 93e92a47169ee84e1a42c68f9b890314f8866de1 (patch) | |
| tree | 6417dfea9a99c4ce3b1782fbed0ef7956b70661a /tests/Tests/Helpers.hs | |
| parent | 487d01118fb55c351f61a58d2b5411ae6de30629 (diff) | |
Renamed removedLeadingTrailingSpace to trim.
Also removeLeadingSpace to triml,
removeTrailingSpace to trimr.
Diffstat (limited to 'tests/Tests/Helpers.hs')
| -rw-r--r-- | tests/Tests/Helpers.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/Tests/Helpers.hs b/tests/Tests/Helpers.hs index 86a92fb0c..5769a4985 100644 --- a/tests/Tests/Helpers.hs +++ b/tests/Tests/Helpers.hs @@ -17,7 +17,7 @@ import Test.Framework import Test.Framework.Providers.HUnit import Test.Framework.Providers.QuickCheck2 import Test.HUnit (assertBool) -import Text.Pandoc.Shared (normalize, removeTrailingSpace) +import Text.Pandoc.Shared (normalize, trimr) import Text.Pandoc.Options import Text.Pandoc.Writers.Native (writeNative) import Language.Haskell.TH.Quote (QuasiQuoter(..)) @@ -94,7 +94,7 @@ instance ToString Blocks where toString = writeNative def . toPandoc instance ToString Inlines where - toString = removeTrailingSpace . writeNative def . toPandoc + toString = trimr . writeNative def . toPandoc instance ToString String where toString = id |