mirror of
https://github.com/doomemacs/doomemacs
synced 2025-09-04 15:03:42 -05:00
@@ -14,6 +14,10 @@
|
|||||||
;;
|
;;
|
||||||
;;; Packages
|
;;; Packages
|
||||||
|
|
||||||
|
(defun +clojure-disable-lsp-indentation-h ()
|
||||||
|
(setq-local lsp-enable-indentation nil))
|
||||||
|
|
||||||
|
|
||||||
(use-package! clojure-mode
|
(use-package! clojure-mode
|
||||||
:defer t
|
:defer t
|
||||||
:config
|
:config
|
||||||
@@ -24,15 +28,8 @@
|
|||||||
clojurec-mode-local-vars-hook
|
clojurec-mode-local-vars-hook
|
||||||
clojurescript-mode-local-vars-hook)
|
clojurescript-mode-local-vars-hook)
|
||||||
:append
|
:append
|
||||||
(defun +clojure-disable-lsp-indentation-h ()
|
#'+clojure-disable-lsp-indentation-h
|
||||||
(setq-local lsp-enable-indentation nil))
|
#'lsp!)))
|
||||||
#'lsp!)
|
|
||||||
(after! lsp-clojure
|
|
||||||
(dolist (m '(clojure-mode
|
|
||||||
clojurec-mode
|
|
||||||
clojurescript-mode
|
|
||||||
clojurex-mode))
|
|
||||||
(add-to-list 'lsp-language-id-configuration (cons m "clojure"))))))
|
|
||||||
|
|
||||||
|
|
||||||
(use-package! clojure-ts-mode
|
(use-package! clojure-ts-mode
|
||||||
@@ -48,6 +45,14 @@
|
|||||||
(set-tree-sitter! 'jank-mode 'clojure-ts-jank-mode 'cpp)
|
(set-tree-sitter! 'jank-mode 'clojure-ts-jank-mode 'cpp)
|
||||||
(set-tree-sitter! 'joker-mode 'clojure-ts-joker-mode 'clojure)
|
(set-tree-sitter! 'joker-mode 'clojure-ts-joker-mode 'clojure)
|
||||||
:config
|
:config
|
||||||
|
(when (modulep! +lsp)
|
||||||
|
(add-hook! '(clojure-ts-mode-local-vars-hook
|
||||||
|
clojure-ts-clojurec-mode-local-vars-hook
|
||||||
|
clojure-ts-clojurescript-mode-local-vars-hook)
|
||||||
|
:append
|
||||||
|
#'+clojure-disable-lsp-indentation-h
|
||||||
|
#'lsp!))
|
||||||
|
|
||||||
;; HACK: Rely on `major-mode-remap-defaults' instead (upstream also doesn't
|
;; HACK: Rely on `major-mode-remap-defaults' instead (upstream also doesn't
|
||||||
;; check if the grammars are ready before adding these entries, which will
|
;; check if the grammars are ready before adding these entries, which will
|
||||||
;; bork clojure buffers.
|
;; bork clojure buffers.
|
||||||
|
Reference in New Issue
Block a user