about summary refs log tree commit diff
path: root/tools/emacs-pkgs/treecrumbs
diff options
context:
space:
mode:
Diffstat (limited to 'tools/emacs-pkgs/treecrumbs')
-rw-r--r--tools/emacs-pkgs/treecrumbs/treecrumbs.el19
1 files changed, 12 insertions, 7 deletions
diff --git a/tools/emacs-pkgs/treecrumbs/treecrumbs.el b/tools/emacs-pkgs/treecrumbs/treecrumbs.el
index 7694e6134f14..ae8abf867671 100644
--- a/tools/emacs-pkgs/treecrumbs/treecrumbs.el
+++ b/tools/emacs-pkgs/treecrumbs/treecrumbs.el
@@ -36,13 +36,7 @@
 
 (require 'treesit)
 
-(defvar treecrumbs-languages
-  `(;; In YAML documents, crumbs are generated from the keys of maps,
-    ;; and from elements of arrays.
-    (yaml . (("block_mapping_pair" .
-              ,(treesit-query-compile 'yaml '((block_mapping_pair key: (_) @key))))
-             ("block_sequence_item" . "[]"))))
-
+(defvar treecrumbs-languages nil
   "Describes the tree-sitter language grammars supported by
 treecrumbs, and how the breadcrumbs for their node types are
 generated.
@@ -65,6 +59,17 @@ Treecrumbs will only consider node types that are mentioned in
 the node type list. All other nodes are ignored when constructing
 the crumbs.")
 
+(setq treecrumbs-languages
+      `(;; In YAML documents, crumbs are generated from the keys of maps,
+        ;; and from elements of arrays.
+        (yaml . (("block_mapping_pair" .
+                  ,(treesit-query-compile 'yaml '((block_mapping_pair key: (_) @key))))
+                 ("block_sequence" . "[]")
+                 ("flow_pair" .
+                  ;; TODO: Why can this query not match on to (flow_pair)?
+                  ,(treesit-query-compile 'yaml '((_) key: (_) @key)))
+                 ("flow_sequence" . "[]")))))
+
 (defvar-local treecrumbs--current-crumbs nil
   "Current crumbs to display in the header line. Only updated when
 the node under point changes.")