branch: elpa/haskell-ts-mode
commit 5d3bd04e43066164feaa864953d30e53e0e137e3
Author: pranshu <pranshusharma...@gmail.com>
Commit: pranshu <pranshusharma...@gmail.com>

    Better keymap formatting
---
 haskell-ts-mode.el | 10 +++++++---
 1 file changed, 7 insertions(+), 3 deletions(-)

diff --git a/haskell-ts-mode.el b/haskell-ts-mode.el
index c6937939f1..27a15c811e 100644
--- a/haskell-ts-mode.el
+++ b/haskell-ts-mode.el
@@ -280,6 +280,13 @@
          (haskell-ts-defun-name node)
        nil)))
 
+(defvar haskell-ts-mode-map
+  (let ((km (make-sparse-keymap)))
+    (define-key km (kbd "C-c C-c") 'haskell-ts-compile-region-and-go)
+    (define-key km (kbd "C-c C-r") 'haskell-ts-run-haskell)
+    km)
+  "Map for haskell-ts-mode")
+
 ;;;###autoload
 (define-derived-mode haskell-ts-mode prog-mode "haskell ts mode"
   "Major mode for Haskell files using tree-sitter."
@@ -370,9 +377,6 @@
 (defun haskell-ts-haskell-session ()
   (get-buffer-process "*haskell*"))
 
-(define-key haskell-ts-mode-map (kbd "C-c C-c") 
'haskell-ts-compile-region-and-go)
-(define-key haskell-ts-mode-map (kbd "C-c C-r") 'haskell-ts-run-haskell)
-
 (defun haskell-ts-setup-eglot()
   (require 'eglot)
   (add-to-list 'eglot-server-programs

Reply via email to