Fix flycheck staying enabled after doom/reload

This commit is contained in:
Henrik Lissner 2018-08-08 23:34:41 +02:00
parent 808c1356df
commit 63cc8b4306
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395

View file

@ -57,7 +57,7 @@ defined by Emacs, not Doom or packages). This can help make typos stand out.")
;; fontification ;; fontification
rainbow-delimiters-mode highlight-quoted-mode rainbow-delimiters-mode highlight-quoted-mode
;; initialization ;; initialization
+emacs-lisp|init-imenu +emacs-lisp|disable-flycheck-maybe)) +emacs-lisp|init-imenu))
;; Special fontification for doom ;; Special fontification for doom
(font-lock-add-keywords (font-lock-add-keywords
@ -98,11 +98,14 @@ defined by Emacs, not Doom or packages). This can help make typos stand out.")
(defun +emacs-lisp|disable-flycheck-maybe () (defun +emacs-lisp|disable-flycheck-maybe ()
"Disable flycheck-mode if in emacs.d." "Disable flycheck-mode if in emacs.d."
(when (or (not buffer-file-name) (when (and flycheck-mode
(cl-loop for dir in (list doom-emacs-dir doom-private-dir) (eq major-mode 'emacs-lisp-mode)
if (file-in-directory-p buffer-file-name dir) (or (not buffer-file-name)
return t)) (cl-loop for dir in (list doom-emacs-dir doom-private-dir)
(flycheck-mode -1)))) if (file-in-directory-p buffer-file-name dir)
return t)))
(flycheck-mode -1)))
(add-hook 'flycheck-mode-hook #'+emacs-lisp|disable-flycheck-maybe))
;; ;;