[nongnu] elpa/dslide f592ee157b 208/230: don't remove results going backward

[ELPA Syncer]

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

    don't remove results going backward
    
    A more comprehensive approach is required
    
    Signed-off-by: Psionik K <73710933+psionic-k@users.noreply.github.com>
---
 dslide.el | 6 ------
 1 file changed, 6 deletions(-)

diff --git a/dslide.el b/dslide.el
index 4e5b9b111a..a67ecb5789 100644
--- a/dslide.el
+++ b/dslide.el
@@ -1437,12 +1437,6 @@ stateful-sequence class methods.  METHOD-NAME is a 
string."
     (org-element-property :begin next)))
 
 (cl-defmethod dslide-backward ((obj dslide-action-babel))
-  ;; going backwards, if the marker is on the beginning of a block, it means we
-  ;; are leaving it and want to clean up its results
-  (let ((element (org-element-at-point (oref obj marker))))
-    (when (= (marker-position (oref obj marker))
-             (org-element-property :begin element))
-      (dslide--remove-babel-results element)))
   (when-let* ((predicate (dslide--method-block-pred
                           '("backward" "both")))
               (prev (dslide-section-previous obj 'src-block predicate)))