File tree Expand file tree Collapse file tree 1 file changed +0
-10
lines changed Expand file tree Collapse file tree 1 file changed +0
-10
lines changed Original file line number Diff line number Diff line change @@ -134,16 +134,6 @@ If INDEX is 0, ELEMENT is inserted before the first element."
134
134
(setcdr c (cons element (cdr c)))
135
135
(set list-var (cdr padded-list))))
136
136
137
- (defmacro +mode-alist-add-ts-modes! (mode-alist)
138
- " Duplicate elements in MODE-ALIST to include Treesit modes.
139
-
140
- For the alist \= ((some-mode . spec)), this will add \= (some-ts-mode . spec)."
141
- `(cl-callf append , mode-alist
142
- (cl-loop
143
- for mode-spec in , mode-alist
144
- collect (let ((ts-mode (intern (format " %s -ts-mode" (string-remove-suffix " -mode" (symbol-name (car mode-spec)))))))
145
- (when (fboundp ts-mode) (cons ts-mode (cdr mode-spec)))))))
146
-
147
137
; ;; Missing primitive utilities
148
138
149
139
; ; Adapted from `evil-unquote' , takes functions into account
You can’t perform that action at this time.
0 commit comments