From: Juri Linkov <juri@linkov.net>
Date: Sun, 12 Jan 2025 07:39:36 +0000 (+0200)
Subject: * lisp/treesit.el: Fix 'treesit--explorer-tree-mode-map'.
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=b02f409e700d11daa6527fcf166eb2e1b1fe8cea;p=emacs.git

* lisp/treesit.el: Fix 'treesit--explorer-tree-mode-map'.

(treesit--explorer-tree-mode-map): Move this map
before its mode 'treesit--explorer-tree-mode',
otherwise the map has no effect.

(cherry picked from commit 54e4b305032d4dadbee286179fa78e01d4d15182)
---

diff --git a/lisp/treesit.el b/lisp/treesit.el
index efae59c0973..fa25b067cca 100644
--- a/lisp/treesit.el
+++ b/lisp/treesit.el
@@ -4038,11 +4038,6 @@ covers point.  PARSER-NAME are unique."
               res)))
     (nreverse res)))
 
-(define-derived-mode treesit--explorer-tree-mode special-mode
-  "TS Explorer"
-  "Mode for displaying syntax trees for `treesit-explore-mode'."
-  nil)
-
 (defvar-keymap treesit--explorer-tree-mode-map
   :doc "Keymap for the treesit tree explorer.
 
@@ -4053,6 +4048,11 @@ Navigates from button to button."
   "TAB" #'forward-button
   "<backtab>" #'backward-button)
 
+(define-derived-mode treesit--explorer-tree-mode special-mode
+  "TS Explorer"
+  "Mode for displaying syntax trees for `treesit-explore-mode'."
+  nil)
+
 (defun treesit-explorer-switch-parser (parser)
   "Switch explorer to use PARSER."
   (interactive