summaryrefslogtreecommitdiff
path: root/.config/emacs/init.el
diff options
context:
space:
mode:
Diffstat (limited to '.config/emacs/init.el')
-rw-r--r--.config/emacs/init.el7
1 files changed, 7 insertions, 0 deletions
diff --git a/.config/emacs/init.el b/.config/emacs/init.el
index d5e4bd3..3794825 100644
--- a/.config/emacs/init.el
+++ b/.config/emacs/init.el
@@ -68,6 +68,13 @@ BODY directly after ‘(interactive)’."
(string-remove-suffix "-mode" (symbol-name mode))
"-ts-mode")))
+(defun x-ts-mode-to-mode (ts-mode)
+ "Get the non-tree-sitter mode corresponding to TS-MODE."
+ (declare (pure t) (side-effect-free t))
+ (intern (concat
+ (string-remove-suffix "-ts-mode" (symbol-name ts-mode))
+ "-mode")))
+
(defun x-string-split (separators string)
"Wrapper around ‘string-split' that puts SEPARATORS first. This makes
it convenient to use in ‘thread-last’."