emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[nongnu] elpa/treesit-fold 15811f4465 386/417: fix: on fold hook in recu


From: ELPA Syncer
Subject: [nongnu] elpa/treesit-fold 15811f4465 386/417: fix: on fold hook in recursive open
Date: Mon, 1 Jul 2024 10:03:08 -0400 (EDT)

branch: elpa/treesit-fold
commit 15811f446556fa1c671b5bca551c06e6bd01e521
Author: JenChieh <jcs090218@gmail.com>
Commit: JenChieh <jcs090218@gmail.com>

    fix: on fold hook in recursive open
---
 treesit-fold.el | 7 +++----
 1 file changed, 3 insertions(+), 4 deletions(-)

diff --git a/treesit-fold.el b/treesit-fold.el
index 4e038b5082..91cca5e835 100644
--- a/treesit-fold.el
+++ b/treesit-fold.el
@@ -407,10 +407,9 @@ If the current node is not folded or not foldable, do 
nothing."
   (treesit-fold--ensure-ts
     (when-let* ((node (treesit-fold--foldable-node-at-pos))
                 (beg (tsc-node-start-position node))
-                (end (tsc-node-end-position node)))
-      (thread-last (overlays-in beg end)
-                   (seq-filter (lambda (ov) (eq (overlay-get ov 'invisible) 
'treesit-fold)))
-                   (mapc #'delete-overlay))
+                (end (tsc-node-end-position node))
+                (nodes (treesit-fold--overlays-in 'invisible 'treesit-fold beg 
end)))
+      (mapc #'delete-overlay nodes)
       (run-hooks 'treesit-fold-on-fold-hook))))
 
 ;;;###autoload



reply via email to

[Prev in Thread] Current Thread [Next in Thread]