feat: Move folding only inside range

emacs-vs · May 20, 2024 · 26b9c3b · 26b9c3b
1 parent 298d82e
commit 26b9c3b
Showing 1 changed file with 4 additions and 2 deletions.
diff --git a/vs-edit-mode.el b/vs-edit-mode.el
@@ -436,8 +436,10 @@
 (defun vs-edit-close-node ()
   "Close the current scope of the node."
   (interactive)
-  (when-let ((ov (or (vs-edit--close-node) (ts-fold-close))))
-    (goto-char (overlay-start ov))))
+  (when-let* ((ov (or (vs-edit--close-node) (ts-fold-close)))
+              (beg (overlay-start ov))
+              ((< beg (point))))
+    (goto-char beg)))
 
 ;;;###autoload
 (defun vs-edit-open-node ()