diff options
Diffstat (limited to 'tests/Tests')
-rw-r--r-- | tests/Tests/Old.hs | 2 | ||||
-rw-r--r-- | tests/Tests/Readers/Txt2Tags.hs | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/tests/Tests/Old.hs b/tests/Tests/Old.hs index 300430e79..256855a1d 100644 --- a/tests/Tests/Old.hs +++ b/tests/Tests/Old.hs @@ -141,7 +141,7 @@ tests = [ testGroup "markdown" "haddock-reader.haddock" "haddock-reader.native" ] , testGroup "txt2tags" - [ test "reader" ["-r", "t2t", "-w", "native"] + [ test "reader" ["-r", "t2t", "-w", "native", "-s"] "txt2tags.t2t" "txt2tags.native" ] , testGroup "epub" [ test "features" ["-r", "epub", "-w", "native"] diff --git a/tests/Tests/Readers/Txt2Tags.hs b/tests/Tests/Readers/Txt2Tags.hs index 4748cdc07..fd7c767e0 100644 --- a/tests/Tests/Readers/Txt2Tags.hs +++ b/tests/Tests/Readers/Txt2Tags.hs @@ -12,7 +12,7 @@ import Data.Monoid (mempty, mconcat) import Text.Pandoc.Readers.Txt2Tags t2t :: String -> Pandoc -t2t s = readTxt2Tags (T2TMeta "date" "mtime" "in" "out") def ('\n' : s) +t2t s = readTxt2Tags (T2TMeta "date" "mtime" "in" "out") def s infix 4 =: (=:) :: ToString c |