[nongnu] elpa/haskell-ts-mode 602609aed1: Changed navigation(for the better)

[ELPA Syncer]

branch: elpa/haskell-ts-mode
commit 602609aed18e622bf2285e57b28928fbef6e9b04
Author: pranshu sharma <pranshu@pebl>
Commit: pranshu sharma <pranshu@pebl>

    Changed navigation(for the better)
---
 haskell-ts-mode.el | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/haskell-ts-mode.el b/haskell-ts-mode.el
index 0ebc2d10e5..fae70f2a57 100644
--- a/haskell-ts-mode.el
+++ b/haskell-ts-mode.el
@@ -375,7 +375,12 @@
              '((?` . ?`) (?\( . ?\)) (?{ . ?}) (?\" . ?\") (?\[ . ?\])))
   ;; Nav
   (setq-local treesit-defun-name-function 'haskell-ts-defun-name)
-  (setq-local treesit-defun-type-regexp "function")
+  (setq-local treesit-defun-type-regexp
+             ;; Since haskell is strict functional, any 2nd level
+             ;; entity is defintion
+             (cons ".+"
+                   (lambda (node)
+                     (string= "declarations" (treesit-node-type 
(treesit-node-parent node))))))
   (setq-local prettify-symbols-alist haskell-ts-prettify-symbols-alist)
   ;; Imenu
   (setq-local treesit-simple-imenu-settings