[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[nongnu] elpa/haskell-ts-mode 2280feefe6 3/8: Comment fixed
From: |
ELPA Syncer |
Subject: |
[nongnu] elpa/haskell-ts-mode 2280feefe6 3/8: Comment fixed |
Date: |
Mon, 16 Sep 2024 10:00:12 -0400 (EDT) |
branch: elpa/haskell-ts-mode
commit 2280feefe6f09022b29e6365ddd315bdd1ae20eb
Author: pranshu sharma <pranshu@pebl>
Commit: pranshu sharma <pranshu@pebl>
Comment fixed
p-prev was broken
---
haskell-ts-mode.el | 10 ++++++----
1 file changed, 6 insertions(+), 4 deletions(-)
diff --git a/haskell-ts-mode.el b/haskell-ts-mode.el
index 6a5c794abe..7ff4d7eff3 100644
--- a/haskell-ts-mode.el
+++ b/haskell-ts-mode.el
@@ -172,11 +172,13 @@
(defvar haskell-ts-indent-rules
(let* ((p-sib
(lambda (node arg)
- (let ((n (treesit-node-prev-sibling node)))
+ (let* ((func (if arg
+ 'treesit-node-prev-sibling
+ 'treesit-node-next-sibling))
+ (n (funcall func node)))
(while (and n (string-match (regexp-opt haskell-ts--ignore-types)
(treesit-node-type n)))
- (setq n (if arg (treesit-node-prev-sibling n)
- (treesit-node-next-sibling n))))
+ (setq n (funcall func n)))
n)))
(p-prev-sib
(lambda (node _ _) (treesit-node-start (funcall p-sib node t))))
@@ -189,7 +191,7 @@
;; 3. parent
;; (relevent means type not it haskell-ts--ignore-types)
(lambda (node parent _)
- (if-let ((next-sib (funcall ,p-sib node t)))
+ (if-let ((next-sib (funcall ,p-sib node nil)))
(treesit-node-start next-sib)
(if-let ((prev-sib (funcall ,p-prev-sib node nil nil)))
prev-sib
- [nongnu] elpa/haskell-ts-mode updated (bf632cba27 -> 575748b9a5), ELPA Syncer, 2024/09/16
- [nongnu] elpa/haskell-ts-mode ef35522e99 5/8: Fixed indent for (parent-is "match") scinario, ELPA Syncer, 2024/09/16
- [nongnu] elpa/haskell-ts-mode 739415d37d 1/8: Indent fixes(just for consistancy), ELPA Syncer, 2024/09/16
- [nongnu] elpa/haskell-ts-mode 59b146204b 6/8: Fixed indent of ']', ELPA Syncer, 2024/09/16
- [nongnu] elpa/haskell-ts-mode 2280feefe6 3/8: Comment fixed,
ELPA Syncer <=
- [nongnu] elpa/haskell-ts-mode 575748b9a5 8/8: Indent changes to comment, case, infix, ELPA Syncer, 2024/09/16
- [nongnu] elpa/haskell-ts-mode a2b07815bc 2/8: shortening statmenet, ELPA Syncer, 2024/09/16
- [nongnu] elpa/haskell-ts-mode cf0c9c308c 4/8: Changed indentation of infix, ELPA Syncer, 2024/09/16
- [nongnu] elpa/haskell-ts-mode eea9607a42 7/8: Forgot defvar + indent of case fixed, ELPA Syncer, 2024/09/16