summaryrefslogtreecommitdiff
path: root/test/clarktown/parsers
diff options
context:
space:
mode:
authorAsko Nomm <asko@bien.ee>2022-04-11 00:33:47 +0200
committerAsko Nomm <asko@bien.ee>2022-04-11 00:33:47 +0200
commitda5edae76e75f904e395b1b712192a4d9be35ace (patch)
treeeac23795f03add98b3b0b1ef2e3302b8905ec674 /test/clarktown/parsers
parent8aa7f6aac2ca359b810bdc4f7a5ad143c6642a06 (diff)
Fix #12: Links where the label has dashes (`-`) do not get parsed
Diffstat (limited to 'test/clarktown/parsers')
-rw-r--r--test/clarktown/parsers/link_and_image_test.clj3
1 files changed, 3 insertions, 0 deletions
diff --git a/test/clarktown/parsers/link_and_image_test.clj b/test/clarktown/parsers/link_and_image_test.clj
index 5630306..348a8f9 100644
--- a/test/clarktown/parsers/link_and_image_test.clj
+++ b/test/clarktown/parsers/link_and_image_test.clj
@@ -9,6 +9,9 @@
(is (= (link-and-image/render "[This is a link](https://example.com)" nil)
"<a href=\"https://example.com\">This is a link</a>"))
+ (is (= (link-and-image/render "[This-is-a-link](https://example.com)" nil)
+ "<a href=\"https://example.com\">This-is-a-link</a>"))
+
(is (= (link-and-image/render "[x] [label](link)" nil)
"[x] <a href=\"link\">label</a>"))