76cacb5bfe
Calling this pivotal macro "def-package!" has frequently been a source of confusion. It is a thin wrapper around use-package, and it should be obvious that it is so. For this reason, and to match the naming convention used with other convenience macros/wrappers, it is now use-package!. Also changes def-package-hook! -> use-package-hook! The old macros are now marked obsolete and will be removed when straight integration is merged.
30 lines
1.2 KiB
EmacsLisp
30 lines
1.2 KiB
EmacsLisp
;;; lang/haskell/+intero.el -*- lexical-binding: t; -*-
|
|
;;;###if (featurep! +intero)
|
|
|
|
(use-package! intero
|
|
:commands intero-mode
|
|
:init
|
|
(defun +haskell|init-intero ()
|
|
"Initializes `intero-mode' in haskell-mode, unless stack isn't installed.
|
|
This is necessary because `intero-mode' doesn't do its own error checks."
|
|
(when (derived-mode-p 'haskell-mode)
|
|
(if (executable-find "stack")
|
|
(intero-mode +1)
|
|
(message "Couldn't find stack. Refusing to enable intero-mode."))))
|
|
(add-hook 'haskell-mode-local-vars-hook #'+haskell|init-intero)
|
|
:config
|
|
(setq haskell-compile-cabal-build-command "stack build --fast")
|
|
(set-lookup-handlers! 'intero-mode :definition #'intero-goto-definition)
|
|
(set-company-backend! 'intero-mode 'intero-company)
|
|
(when (featurep! :tools flycheck)
|
|
(flycheck-add-next-checker 'intero '(warning . haskell-hlint)))
|
|
|
|
(when (featurep 'evil)
|
|
(add-hook 'intero-mode-hook #'evil-normalize-keymaps))
|
|
(map! :localleader
|
|
:map intero-mode-map
|
|
"t" #'intero-type-at
|
|
"i" #'intero-info
|
|
"l" #'intero-repl-load
|
|
"e" #'intero-repl-eval-region
|
|
"a" #'intero-apply-suggestions))
|