emenel/doomemacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Rewrite doctor; move warn! blocks out in doctor.el files

Browse source
This commit is contained in:
Henrik Lissner 2018-03-12 13:16:16 -04:00
parent 5c36519dab
commit 74c8b1d113
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395
16 changed files with 193 additions and 147 deletions
Download patch file Download diff file Expand all files Collapse all files

6
modules/lang/haskell/+dante.el
View file

@ -5,9 +5,6 @@
:after haskell-mode
:hook (haskell-mode . dante-mode)
:config
(unless (executable-find "cabal")
(warn! "Couldn't find cabal, haskell-mode may have issues"))
(add-hook 'haskell-mode-hook #'interactive-haskell-mode)
(add-hook 'dante-mode-hook #'flycheck-mode))
@ -18,8 +15,5 @@
:init
(add-hook 'haskell-mode-hook #'ghc-comp-init)
:config
(unless (executable-find "ghc-mod")
(warn! "Couldn't find ghc-mod on PATH. Code completion is disabled."))
(setq company-ghc-show-info 'oneline)
(set! :company-backend 'haskell-mode #'company-ghc))

5
modules/lang/haskell/+intero.el
View file

@ -5,12 +5,7 @@
:after haskell-mode
:config
(add-hook 'haskell-mode-hook #'+haskell|init-intero)
(unless (executable-find "stack")
(warn! "Couldn't find stack. Intero has been disabled."))
(add-hook! 'intero-mode-hook #'(flycheck-mode eldoc-mode))
(set! :lookup 'haskell-mode :definition #'intero-goto-definition))

13
modules/lang/haskell/doctor.el Normal file
View file

@ -0,0 +1,13 @@
;;; lang/haskell/doctor.el -*- lexical-binding: t; -*-
(when (featurep! +dante)
(unless (executable-find "cabal")
(warn! "Couldn't find cabal, haskell-mode may have issues"))
(unless (executable-find "ghc-mod")
(warn! "Couldn't find ghc-mod on PATH. Code completion will not work")))
(when (featurep! +intero)
(unless (executable-find "stack")
(warn! "Couldn't find stack. Intero will not work")))