mirror of
https://github.com/Orc/discount.git
synced 2026-09-25 04:10:00 +03:00
David Parsons
3aa4343255
which gives me the ability to do verbose and nonverbose test suite running (`VERBOSE=1 make test` is the traditional output now, and `make test` just gives pass/fail on each .t file)
106 lines
2.4 KiB
Raku
106 lines
2.4 KiB
Raku
. tests/functions.sh
|
|
|
|
title "embedded links"
|
|
|
|
rc=0
|
|
MARKDOWN_FLAGS=
|
|
|
|
try 'url contains &' '[hehehe](u&rl)' '<p><a href="u&rl">hehehe</a></p>'
|
|
try 'url contains +' '[hehehe](u+rl)' '<p><a href="u+rl">hehehe</a></p>'
|
|
try 'url contains "' '[hehehe](u"rl)' '<p><a href="u%22rl">hehehe</a></p>'
|
|
try 'url contains <' '[hehehe](u<rl)' '<p><a href="u<rl">hehehe</a></p>'
|
|
try 'url contains whitespace' '[ha](r u)' '<p><a href="r%20u">ha</a></p>'
|
|
|
|
try 'url contains whitespace & title' \
|
|
'[hehehe](r u "there")' \
|
|
'<p><a href="r%20u" title="there">hehehe</a></p>'
|
|
|
|
try 'url contains escaped )' \
|
|
'[hehehe](u\))' \
|
|
'<p><a href="u)">hehehe</a></p>'
|
|
|
|
try 'image label contains <' \
|
|
'' \
|
|
'<p><img src="url" alt="he<he<he" /></p>'
|
|
|
|
try 'image label contains >' \
|
|
'' \
|
|
'<p><img src="url" alt="he>he>he" /></p>'
|
|
|
|
try 'sloppy context link' \
|
|
'[heh]( url "how about it?" )' \
|
|
'<p><a href="url" title="how about it?">heh</a></p>'
|
|
|
|
try 'footnote urls formed properly' \
|
|
'[hehehe]: hohoho "ha ha"
|
|
|
|
[hehehe][]' \
|
|
'<p><a href="hohoho" title="ha ha">hehehe</a></p>'
|
|
|
|
try 'linky-like []s work' \
|
|
'[foo]' \
|
|
'<p>[foo]</p>'
|
|
|
|
try 'pseudo-protocol "id:"'\
|
|
'[foo](id:bar)' \
|
|
'<p><a id="bar">foo</a></p>'
|
|
|
|
try 'pseudo-protocol "class:"' \
|
|
'[foo](class:bar)' \
|
|
'<p><span class="bar">foo</span></p>'
|
|
|
|
try 'pseudo-protocol "abbr:"'\
|
|
'[foo](abbr:bar)' \
|
|
'<p><abbr title="bar">foo</abbr></p>'
|
|
|
|
try 'nested [][]s' \
|
|
'[[z](y)](x)' \
|
|
'<p><a href="x">[z](y)</a></p>'
|
|
|
|
try 'empty [][] tags' \
|
|
'[![][1]][2]
|
|
|
|
[1]: image1
|
|
[2]: image2' \
|
|
'<p><a href="image2"><img src="image1" alt="" /></a></p>'
|
|
|
|
try 'footnote cuddled up to text' \
|
|
'foo
|
|
[bar]:bar' \
|
|
'<p>foo</p>'
|
|
|
|
try 'mid-paragraph footnote' \
|
|
'talk talk talk talk
|
|
[bar]: bar
|
|
talk talk talk talk' \
|
|
'<p>talk talk talk talk
|
|
talk talk talk talk</p>'
|
|
|
|
try 'mid-blockquote footnote' \
|
|
'>blockquote!
|
|
[footnote]: here!
|
|
>blockquote!' \
|
|
'<blockquote><p>blockquote!
|
|
blockquote!</p></blockquote>'
|
|
|
|
try 'end-blockquote footnote' \
|
|
'>blockquote!
|
|
>blockquote!
|
|
[footnote]: here!' \
|
|
'<blockquote><p>blockquote!
|
|
blockquote!</p></blockquote>'
|
|
|
|
try 'start-blockquote footnote' \
|
|
'[footnote]: here!
|
|
>blockquote!
|
|
>blockquote!' \
|
|
'<blockquote><p>blockquote!
|
|
blockquote!</p></blockquote>'
|
|
|
|
try '[text] (text) not a link' \
|
|
'[test] (me)' \
|
|
'<p>[test] (me)</p>'
|
|
|
|
summary $0
|
|
exit $rc
|