diff options
| author | John MacFarlane <[email protected]> | 2021-07-30 17:23:46 -0600 |
|---|---|---|
| committer | John MacFarlane <[email protected]> | 2021-08-10 10:48:55 -0700 |
| commit | 6543b05116ee58ef4de62f93dcafeb27617d83e6 (patch) | |
| tree | 807dcf073285e484329982f3c7bd3d4031f370b7 /test/Tests/Command.hs | |
| parent | c0b68b2030ecdb4ad006443a56ce99aebc92fbc5 (diff) | |
Add RTF reader.
- `rtf` is now supported as an input format as well as output.
- New module Text.Pandoc.Readers.RTF (exporting `readRTF`). [API change]
Closes #3982.
Diffstat (limited to 'test/Tests/Command.hs')
| -rw-r--r-- | test/Tests/Command.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/test/Tests/Command.hs b/test/Tests/Command.hs index 539be1a1a..c197fd11f 100644 --- a/test/Tests/Command.hs +++ b/test/Tests/Command.hs @@ -96,7 +96,7 @@ dropPercent xs = xs runCommandTest :: FilePath -> FilePath -> Int -> String -> TestTree runCommandTest testExePath fp num code = - goldenTest testname getExpected getActual compareValues updateGolden + goldenTest testname getExpected getActual compareValues' updateGolden where testname = "#" <> show num codelines = lines code @@ -109,7 +109,7 @@ runCommandTest testExePath fp num code = norm = unlines normlines getExpected = return norm getActual = snd <$> execTest testExePath cmd input - compareValues expected actual + compareValues' expected actual | actual == expected = return Nothing | otherwise = return $ Just $ "--- test/command/" ++ fp ++ "\n+++ " ++ cmd ++ "\n" ++ showDiff (1,1) |