aboutsummaryrefslogtreecommitdiff
path: root/test/Tests/Readers/Org
diff options
context:
space:
mode:
authorAlbert Krewinkel <tarleb@zeitkraut.de>2018-09-05 14:26:06 +0200
committerAlbert Krewinkel <tarleb@zeitkraut.de>2018-09-05 17:12:54 +0200
commitceec26f6471d3c1cbd971cf7701144ccd5bbfdca (patch)
treeb20d8f7b843d06f3d1188ac18aefee23bdcf10f6 /test/Tests/Readers/Org
parent70d0ae135e14bd3a47d271b4f8ee6ed7d50528a7 (diff)
downloadpandoc-ceec26f6471d3c1cbd971cf7701144ccd5bbfdca.tar.gz
Org reader: strip planning info from output
Planning info is parsed, but not included in the output (as is the default with Emacs Org-mode). Fixes: #4867
Diffstat (limited to 'test/Tests/Readers/Org')
-rw-r--r--test/Tests/Readers/Org/Block/Header.hs25
1 files changed, 25 insertions, 0 deletions
diff --git a/test/Tests/Readers/Org/Block/Header.hs b/test/Tests/Readers/Org/Block/Header.hs
index 3b0d7dda9..6f38714cd 100644
--- a/test/Tests/Readers/Org/Block/Header.hs
+++ b/test/Tests/Readers/Org/Block/Header.hs
@@ -181,4 +181,29 @@ tests =
, " :END:"
] =?>
headerWith ("not-numbered", ["unnumbered"], []) 1 "Not numbered"
+
+ , testGroup "planning information"
+ [ "Planning info is not included in output" =:
+ T.unlines [ "* important"
+ , T.unwords
+ [ "CLOSED: [2018-09-05 Wed 13:58]"
+ , "DEADLINE: <2018-09-17 Mon>"
+ , "SCHEDULED: <2018-09-10 Mon>"
+ ]
+ ] =?>
+ headerWith ("important", [], []) 1 "important"
+
+ , "Properties after planning info are recognized" =:
+ T.unlines [ "* important "
+ , " " <> T.unwords
+ [ "CLOSED: [2018-09-05 Wed 13:58]"
+ , "DEADLINE: <2018-09-17 Mon>"
+ , "SCHEDULED: <2018-09-10 Mon>"
+ ]
+ , " :PROPERTIES:"
+ , " :custom_id: look"
+ , " :END:"
+ ] =?>
+ headerWith ("look", [], []) 1 "important"
+ ]
]