aboutsummaryrefslogtreecommitdiff
path: root/test
diff options
context:
space:
mode:
authorAlbert Krewinkel <albert@zeitkraut.de>2021-05-17 13:00:38 +0200
committerAlbert Krewinkel <albert@zeitkraut.de>2021-05-17 13:14:32 +0200
commit4417dacc440e269c5a4db1d67b52da9e0fe05561 (patch)
tree0bd56edb911c0c97a9b07ca911baba614d8b6dc3 /test
parentd3ca48656f036888fcf60acb7a0364a20f3554bf (diff)
downloadpandoc-4417dacc440e269c5a4db1d67b52da9e0fe05561.tar.gz
ConTeXt writer: use span identifiers as reference anchors.
Closes: #7246
Diffstat (limited to 'test')
-rw-r--r--test/Tests/Writers/ConTeXt.hs3
1 files changed, 3 insertions, 0 deletions
diff --git a/test/Tests/Writers/ConTeXt.hs b/test/Tests/Writers/ConTeXt.hs
index a4aa69dcd..fbbf9b948 100644
--- a/test/Tests/Writers/ConTeXt.hs
+++ b/test/Tests/Writers/ConTeXt.hs
@@ -43,6 +43,9 @@ tests =
[ testGroup "inline code"
[ "with '}'" =: code "}" =?> "\\mono{\\}}"
, "without '}'" =: code "]" =?> "\\type{]}"
+ , "span with ID" =:
+ spanWith ("city", [], []) "Berlin" =?>
+ "\\reference[city]{}Berlin"
, testProperty "code property" $ \s -> null s || '\n' `elem` s ||
if '{' `elem` s || '}' `elem` s
then context' (code $ pack s) == "\\mono{" ++