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

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

[nongnu] elpa/treesit-fold 3ebdb45c3d 019/417: fix evil integration if i


From: ELPA Syncer
Subject: [nongnu] elpa/treesit-fold 3ebdb45c3d 019/417: fix evil integration if install from nix
Date: Mon, 1 Jul 2024 10:02:06 -0400 (EDT)

branch: elpa/treesit-fold
commit 3ebdb45c3ddc96fd967ce20c392972ad4f5866a0
Author: Junyi Hou <junyi.hou@robinhood.com>
Commit: Junyi Hou <junyi.hou@robinhood.com>

    fix evil integration if install from  nix
---
 tree-sitter-fold.el | 25 +++++++++++--------------
 1 file changed, 11 insertions(+), 14 deletions(-)

diff --git a/tree-sitter-fold.el b/tree-sitter-fold.el
index fbf43d794d..e5d6c1eceb 100644
--- a/tree-sitter-fold.el
+++ b/tree-sitter-fold.el
@@ -73,25 +73,22 @@ the fold in a cons cell.  See 
`tree-sitter-fold-range-python' for an example."
       (progn
         (setq-local line-move-ignore-invisible t)
         (add-to-invisibility-spec '(tree-sitter-fold . t))
+
+        ;; evil integration
+        (if (bound-and-true-p evil-fold-list)
+            (add-to-list 'evil-fold-list
+                         '((tree-sitter-fold-mode)
+                           :open tree-sitter-fold-open
+                           :close tree-sitter-fold-close
+                           :open-rec tree-sitter-fold-open-recursively
+                           :open-all tree-sitter-fold-open-all
+                           :close-all tree-sitter-fold-close-all)))
+
         (run-hooks 'tree-sitter-fold-mode-hook))
     (remove-from-invisibility-spec '(tree-sitter-fold . t))
     (let ((tree-sitter-mode t))
       (tree-sitter-fold-open-all))))
 
-;; ================
-;; evil integration
-;; ================
-
-(eval-when-compile
-  (if (bound-and-true-p evil-fold-list)
-      (add-to-list 'evil-fold-list
-                   '((tree-sitter-fold-mode)
-                     :open tree-sitter-fold-open
-                     :close tree-sitter-fold-close
-                     :open-rec tree-sitter-fold-open-recursively
-                     :open-all tree-sitter-fold-open-all
-                     :close-all tree-sitter-fold-close-all))))
-
 ;; ============================================
 ;; using `tree-sitter' to determine fold range.
 ;; ============================================



reply via email to

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