aboutsummaryrefslogtreecommitdiff
path: root/tests/Tests/Readers/Txt2Tags.hs
diff options
context:
space:
mode:
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