Org reader: Add test for image links
Tests for image links with non-image targets, as introduced in
commit 2ca5101
.
This commit is contained in:
parent
2ca5101113
commit
5871955169
1 changed files with 4 additions and 0 deletions
|
@ -212,6 +212,10 @@ tests =
|
|||
"[[sunset.png][dusk.svg]]" =?>
|
||||
(para $ link "sunset.png" "" (image "dusk.svg" "" ""))
|
||||
|
||||
, "Image link with non-image target" =:
|
||||
"[[http://example.com][logo.png]]" =?>
|
||||
(para $ link "http://example.com" "" (image "logo.png" "" ""))
|
||||
|
||||
, "Plain link" =:
|
||||
"Posts on http://zeitlens.com/ can be funny at times." =?>
|
||||
(para $ spcSep [ "Posts", "on"
|
||||
|
|
Loading…
Add table
Reference in a new issue