diff options
| author | Hans-Peter Deifel <hpdeifel@gmx.de> | 2015-02-26 13:11:50 +0100 |
|---|---|---|
| committer | Hans-Peter Deifel <hpdeifel@gmx.de> | 2015-02-26 13:11:50 +0100 |
| commit | 58719551698dbb0f924101f128c7d0fafc3fd3d8 (patch) | |
| tree | df6899c366f86937a49e77aaed7e371bbf3b71ad | |
| parent | 2ca510111349d2da8fabbd38e2dcb4bad923b6f2 (diff) | |
| download | pandoc-58719551698dbb0f924101f128c7d0fafc3fd3d8.tar.gz | |
Org reader: Add test for image links
Tests for image links with non-image targets, as introduced in
commit 2ca5101.
| -rw-r--r-- | tests/Tests/Readers/Org.hs | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/tests/Tests/Readers/Org.hs b/tests/Tests/Readers/Org.hs index 39c40cd45..3a26861f0 100644 --- a/tests/Tests/Readers/Org.hs +++ b/tests/Tests/Readers/Org.hs @@ -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" |