From 7e5220b57c5a48fabe6e43ba270db812593d3463 Mon Sep 17 00:00:00 2001
From: Albert Krewinkel <albert@zeitkraut.de>
Date: Wed, 9 Nov 2016 22:49:20 +0100
Subject: Org reader: allow HTML attribs on non-figure images

Images which are the only element in a paragraph can still be given HTML
attributes, even if the image does not have a caption and is hence not a figure.
The following will add set the `width` attribute of the image to `50%`:

    #+ATTR_HTML: :width 50%
    [[file:image.jpg]]

Closes: #3222
---
 tests/Tests/Readers/Org.hs | 6 ++++++
 1 file changed, 6 insertions(+)

(limited to 'tests/Tests')

diff --git a/tests/Tests/Readers/Org.hs b/tests/Tests/Readers/Org.hs
index 1b536551c..882701644 100644
--- a/tests/Tests/Readers/Org.hs
+++ b/tests/Tests/Readers/Org.hs
@@ -196,6 +196,12 @@ tests =
           "[[file:sunrise.jpg]]" =?>
           (para $ image "sunrise.jpg" "" "")
 
+      , "Image with html attributes" =:
+          unlines [ "#+ATTR_HTML: :width 50%"
+                  , "[[file:guinea-pig.gif]]"
+                  ] =?>
+          (para $ imageWith ("", [], [("width", "50%")]) "guinea-pig.gif" "" "")
+
       , "Explicit link" =:
           "[[http://zeitlens.com/][pseudo-random /nonsense/]]" =?>
           (para $ link "http://zeitlens.com/" ""
-- 
cgit v1.2.3