[nongnu] elpa/dslide 513b1109fb 06/16: Get rid of erroneous step padding in simple slide images

[ELPA Syncer]

branch: elpa/dslide
commit 513b1109fbf1de25396c403ce3e32baac2a59068
Author: Psionik K <73710933+psionic-k@users.noreply.github.com>
Commit: Psionik K <73710933+psionic-k@users.noreply.github.com>

    Get rid of erroneous step padding in simple slide images
    
    Return value needed to depend on the options to correctly avoid adding steps
    when there is no standalone display or reveal going on.
---
 dslide.el | 8 ++++++--
 1 file changed, 6 insertions(+), 2 deletions(-)

diff --git a/dslide.el b/dslide.el
index 277f05decc..e0818876c2 100644
--- a/dslide.el
+++ b/dslide.el
@@ -1674,7 +1674,8 @@ Only affects standalone-display.")
           (oset obj overlays (seq-difference (oref obj overlays) 
link-overlays))
           (mapc #'delete-overlay link-overlays)))
 
-      (org-element-property :end link))))
+      (when (or standalone-display in-place)
+        (org-element-property :end link)))))
 
 (cl-defmethod dslide-backward ((obj dslide-action-image))
   ;; When just revealing images without doing standalone display, we can
@@ -1714,7 +1715,10 @@ Only affects standalone-display.")
           (overlay-put overlay 'invisible t)
           (overlay-put overlay 'priority 1000)
           (push overlay (oref obj overlays))))
-      (org-element-property :begin link))))
+
+      (when (or standalone-display
+                slide-display)
+        (org-element-property :begin link)))))
 
 (cl-defmethod dslide-final :after ((obj dslide-action-image))
   (mapc #'delete-overlay (oref obj overlays)))