diff options
-rw-r--r-- | config/emacs/emacs.d/emacs.org | 16 | ||||
-rw-r--r-- | kbg/services/emacs.scm | 5 |
2 files changed, 20 insertions, 1 deletions
diff --git a/config/emacs/emacs.d/emacs.org b/config/emacs/emacs.d/emacs.org index d3b69632..5779bf8b 100644 --- a/config/emacs/emacs.d/emacs.org +++ b/config/emacs/emacs.d/emacs.org @@ -1401,6 +1401,22 @@ https://masteringemacs.org/article/polymode-multiple-major-modes-how-to-use-sql- #+begin_src elisp (use-package synosaurus :hook text-mode) +**** LanguageTool +:PROPERTIES: +:ID: c084445a-9d5c-4a05-8273-f1d6d6cc772d +:END: + +#+begin_src elisp +(use-package flycheck-languagetool + :after flycheck + :hook (text-mode . flycheck-languagetool-setup) + :init + (setq flycheck-languagetool-server-jar (string-join (list user-emacs-directory "language-tool/languagetool-server.jar"))) + (setq flycheck-languagetool-language "en-US") + (setq flycheck-languagetool-check-params '(("disabledRules" . "WHITESPACE_RULE"))) + :config + (flycheck-add-next-checker 'languagetool 'vale)) +#+end_src #+end_src **** Pulsar diff --git a/kbg/services/emacs.scm b/kbg/services/emacs.scm index bdf21ea2..5ba7a801 100644 --- a/kbg/services/emacs.scm +++ b/kbg/services/emacs.scm @@ -7,7 +7,8 @@ #:use-module (gnu packages emacs) #:use-module ((gnu packages emacs-xyz) #:prefix emacs-xyz:) #:use-module (emacs packages melpa) - #:use-module (kbg packages emacs-xyz)) + #:use-module (kbg packages emacs-xyz) + #:use-module (kbg packages languagetool)) (define rewrite (package-input-rewriting @@ -99,6 +100,7 @@ ;; emacs-flycheck-elixir emacs-flycheck-elm emacs-flycheck-haskell + emacs-flycheck-languagetool emacs-flycheck-ledger emacs-flycheck-ocaml emacs-flycheck-popup-tip @@ -304,6 +306,7 @@ (,(emacs-file "lsp-java") ,(local-file (string-append %dotfiles-root "config/emacs/emacs.d/lsp-java") #:recursive? #t)) + (,(emacs-file "language-tool") ,languagetool) (,(emacs-file "snippets") ,(local-file (string-append %dotfiles-root "config/emacs/emacs.d/snippets") #:recursive? #t)) |