[nongnu] elpa/haskell-ts-mode c49a063e9a 61/61: Fixed defcusotm

[ELPA Syncer]

branch: elpa/haskell-ts-mode
commit c49a063e9acd41ae3b615b3c325918c38a4be17e
Author: pranshu <pranshusharma366@gmail.com>
Commit: pranshu <pranshusharma366@gmail.com>

    Fixed defcusotm
    
    Now no compile warnings
---
 haskell-ts-mode.el | 13 ++++++++-----
 1 file changed, 8 insertions(+), 5 deletions(-)

diff --git a/haskell-ts-mode.el b/haskell-ts-mode.el
index 463e17f3a3..c0cdafd5e8 100644
--- a/haskell-ts-mode.el
+++ b/haskell-ts-mode.el
@@ -41,7 +41,8 @@
 (declare-function treesit-search-subtree "treesit.c")
 
 (defgroup haskell-ts-mode nil
-  "Group that contains haskell-ts-mode variables")
+  "Group that contains haskell-ts-mode variables"
+  :group 'langs)
 
 (defvar haskell-ts-font-lock-feature-list
   '((comment str pragma parens)
@@ -51,11 +52,13 @@
 
 (defcustom haskell-ts-use-indent t
   "Set to non-nil to use the indentation provided by haskell-ts-mode"
-  :group 'haskell-ts-mode)
+  :group 'haskell-ts-mode
+  :type 'bool)
 
 (defcustom haskell-ts-font-lock-level 4
   "Level of font lock, 1 for minimum highlghting and 4 for maximum."
-  :group 'haskell-ts-mode)
+  :group 'haskell-ts-mode
+  :type 'integer)
 
 (defvar haskell-ts-prettify-symbols-alits
   '(("\\" . "λ")
@@ -133,7 +136,7 @@
    `(["(" ")" "[" "]"] @font-lock-operator-face
      (infix operator: (_) @font-lock-operator-face))))
 
-(defvar haskell-ts-indent-rules
+(setq haskell-ts-indent-rules
   (let ((p-prev-sib
         (lambda (node _ _)
           (let ((n (treesit-node-prev-sibling node)))
@@ -141,7 +144,7 @@
               (setq n (treesit-node-prev-sibling n)))
             (treesit-node-start n)))))
     `((haskell
-       ((node-is "comment") column-0 0)
+       ((node-is "comment") prev-sibling 0)
        ((node-is "cpp") column-0 0)
        ((parent-is "comment") column-0 0)
        ((parent-is "imports") column-0 0)