aboutsummaryrefslogtreecommitdiff
path: root/tests/Tests/Readers/Txt2Tags.hs
diff options
context:
space:
mode:
authorJesse Rosenthal <jrosenthal@jhu.edu>2016-12-01 12:47:05 -0500
committerJohn MacFarlane <jgm@berkeley.edu>2017-01-25 17:07:40 +0100
commit5ede57122ce61d1504e81c6429ff26c38490aee6 (patch)
tree1bfb24bda19ee17aa63f795e949b6f65545263fb /tests/Tests/Readers/Txt2Tags.hs
parent3574b98f81c2c24f7ef31f8251ba88792a2c06f0 (diff)
downloadpandoc-5ede57122ce61d1504e81c6429ff26c38490aee6.tar.gz
Update all tests to use new readers and error structure.
Diffstat (limited to 'tests/Tests/Readers/Txt2Tags.hs')
-rw-r--r--tests/Tests/Readers/Txt2Tags.hs4
1 files changed, 3 insertions, 1 deletions
diff --git a/tests/Tests/Readers/Txt2Tags.hs b/tests/Tests/Readers/Txt2Tags.hs
index 1bda32a49..33502ba78 100644
--- a/tests/Tests/Readers/Txt2Tags.hs
+++ b/tests/Tests/Readers/Txt2Tags.hs
@@ -10,8 +10,10 @@ import Text.Pandoc
import Data.List (intersperse)
import Text.Pandoc.Readers.Txt2Tags
+
t2t :: String -> Pandoc
-t2t = handleError . readTxt2Tags (T2TMeta "date" "mtime" "in" "out") def
+-- t2t = handleError . readTxt2Tags (T2TMeta "date" "mtime" "in" "out") def
+t2t = purely $ readTxt2Tags def
infix 4 =:
(=:) :: ToString c