From 2637baf09fce7c598496528da24f6c1b724efa97 Mon Sep 17 00:00:00 2001
From: Raul Benencia <id@rbenencia.name>
Date: Fri, 29 Jul 2022 07:54:42 -0700
Subject: emacs: enable flycheck and languagetool
---
.emacs | 1 +
.emacs.local.d/general.el | 4 ++--
.emacs.local.d/modes/flycheck.el | 8 ++++++++
3 files changed, 11 insertions(+), 2 deletions(-)
diff --git a/.emacs b/.emacs
index e82c972..39ca5da 100644
--- a/.emacs
+++ b/.emacs
@@ -8,6 +8,7 @@
;; Modes
(load-file "~/.emacs.local.d/modes/auto-fill.el")
(load-file "~/.emacs.local.d/modes/doom-modeline.el")
+(load-file "~/.emacs.local.d/modes/flycheck.el")
(load-file "~/.emacs.local.d/modes/flyspell.el")
(load-file "~/.emacs.local.d/modes/go-lang.el")
(load-file "~/.emacs.local.d/modes/hydra.el")
diff --git a/.emacs.local.d/general.el b/.emacs.local.d/general.el
index dc4ca17..76efd12 100644
--- a/.emacs.local.d/general.el
+++ b/.emacs.local.d/general.el
@@ -164,8 +164,8 @@
;;(setq browse-url-browser-function 'browse-url-generic browse-url-generic-program "chromium")
;; Mutt support.
-(setq auto-mode-alist (append '((".*tmp/mutt.*" . mail-mode)) auto-mode-alist))
-(setq auto-mode-alist (append '((".*tmp/neomutt.*" . mail-mode)) auto-mode-alist))
+(setq auto-mode-alist (append '((".*tmp/mutt.*" . message-mode)) auto-mode-alist))
+(setq auto-mode-alist (append '((".*tmp/neomutt.*" . message-mode)) auto-mode-alist))
;; Save what you enter into minibuffer prompts
(setq history-length 25)
diff --git a/.emacs.local.d/modes/flycheck.el b/.emacs.local.d/modes/flycheck.el
index 45571e2..6662c06 100644
--- a/.emacs.local.d/modes/flycheck.el
+++ b/.emacs.local.d/modes/flycheck.el
@@ -10,3 +10,11 @@
:modes (text-mode markdown-mode gfm-mode org-mode))
(add-to-list 'flycheck-checkers 'proselint)
+
+;; TODO: docker run --rm -p 8010:8010 erikvl87/languagetool
+(use-package flycheck-languagetool
+ :ensure t
+ :hook (message-mode . flycheck-languagetool-setup)
+ :init
+ (setq flycheck-languagetool-url "http://localhost:8010")
+)
--
cgit v1.2.3