spacemacs/layers/+lang/elixir/packages.el
syl20bnr f45ce1a88e syntax-checking: rename function add-flycheck-hook to enable-flycheck
spacemacs/add-flycheck-hook was not really hooking anything, change the name
to better reflect what it does.
Also changed the push for a add-to-list to avoid duplicates.
2017-03-19 12:40:36 -04:00

187 lines
6.1 KiB
EmacsLisp

;;; packages.el --- Elixir Layer packages File for Spacemacs
;;
;; Copyright (c) 2012-2017 Sylvain Benner & Contributors
;;
;; Author: Sylvain Benner <sylvain.benner@gmail.com>
;; URL: https://github.com/syl20bnr/spacemacs
;;
;; This file is not part of GNU Emacs.
;;
;;; License: GPLv3
(setq elixir-packages
'(
alchemist
company
elixir-mode
flycheck
flycheck-mix
flycheck-credo
ggtags
helm-gtags
ob-elixir
popwin
smartparens
))
(defun elixir/post-init-company ()
(when (configuration-layer/package-usedp 'alchemist)
(spacemacs|add-company-backends
:backends alchemist-company
:modes elixir-mode alchemist-iex-mode)))
(defun elixir/init-alchemist ()
(use-package alchemist
:defer t
:init
(progn
(spacemacs/register-repl 'alchemist 'alchemist-iex-run "alchemist")
(add-hook 'elixir-mode-hook 'alchemist-mode)
(setq alchemist-project-compile-when-needed t
alchemist-test-status-modeline nil)
(add-to-list 'spacemacs-jump-handlers-elixir-mode
'alchemist-goto-definition-at-point))
:config
(spacemacs/declare-prefix-for-mode 'elixir-mode "mc" "compile")
(spacemacs/declare-prefix-for-mode 'elixir-mode "me" "eval")
(spacemacs/declare-prefix-for-mode 'elixir-mode "mp" "project")
(spacemacs/declare-prefix-for-mode 'elixir-mode "mh" "help")
(spacemacs/declare-prefix-for-mode 'elixir-mode "mt" "test")
(spacemacs/declare-prefix-for-mode 'elixir-mode "ms" "iex")
(spacemacs/declare-prefix-for-mode 'elixir-mode "mm" "mix")
(spacemacs/declare-prefix-for-mode 'elixir-mode "mx" "execute")
(spacemacs/declare-prefix-for-mode 'elixir-mode "mg" "goto")
(spacemacs/set-leader-keys-for-major-mode 'elixir-mode
"el" 'alchemist-eval-current-line
"eL" 'alchemist-eval-print-current-line
"er" 'alchemist-eval-region
"eR" 'alchemist-eval-print-region
"eb" 'alchemist-eval-buffer
"eB" 'alchemist-eval-print-buffer
"ej" 'alchemist-eval-quoted-current-line
"eJ" 'alchemist-eval-print-quoted-current-line
"eu" 'alchemist-eval-quoted-region
"eU" 'alchemist-eval-print-quoted-region
"ev" 'alchemist-eval-quoted-buffer
"eV" 'alchemist-eval-print-quoted-buffer
"pt" 'alchemist-project-find-test
"gt" 'alchemist-project-toggle-file-and-tests
"gT" 'alchemist-project-toggle-file-and-tests-other-window
"h:" 'alchemist-help
"hH" 'alchemist-help-history
"hh" 'alchemist-help-search-at-point
"hr" 'alchemist-help-search-marked-region
"m:" 'alchemist-mix
"mc" 'alchemist-mix-compile
"mx" 'alchemist-mix-run
"mh" 'alchemist-mix-help
"'" 'alchemist-iex-run
"sc" 'alchemist-iex-compile-this-buffer
"si" 'alchemist-iex-run
"sI" 'alchemist-iex-project-run
"sl" 'alchemist-iex-send-current-line
"sL" 'alchemist-iex-send-current-line-and-go
"sm" 'alchemist-iex-reload-module
"sr" 'alchemist-iex-send-region
"sR" 'alchemist-iex-send-region-and-go
"ta" 'alchemist-mix-test
"tb" 'alchemist-mix-test-this-buffer
"tt" 'alchemist-mix-test-at-point
"tf" 'alchemist-test-file
"tn" 'alchemist-test-jump-to-next-test
"tp" 'alchemist-test-jump-to-previous-test
"tr" 'alchemist-mix-rerun-last-test
"xb" 'alchemist-execute-this-buffer
"xf" 'alchemist-execute-file
"x:" 'alchemist-execute
"cb" 'alchemist-compile-this-buffer
"cf" 'alchemist-compile-file
"c:" 'alchemist-compile
"," 'alchemist-goto-jump-back)
(dolist (mode (list alchemist-compile-mode-map
alchemist-eval-mode-map
alchemist-execute-mode-map
alchemist-message-mode-map
alchemist-help-minor-mode-map
alchemist-mix-mode-map
alchemist-macroexpand-mode-map
alchemist-refcard-mode-map
alchemist-test-report-mode-map))
(evil-define-key 'normal mode
(kbd "q") 'quit-window))))
(defun elixir/init-flycheck-mix ()
(use-package flycheck-mix
:commands (flycheck-mix-setup)
:init
(progn
(add-to-list 'safe-local-variable-values
(cons 'elixir-enable-compilation-checking nil))
(add-to-list 'safe-local-variable-values
(cons 'elixir-enable-compilation-checking t))
(add-hook 'elixir-mode-local-vars-hook
'spacemacs//elixir-enable-compilation-checking))))
(defun elixir/init-flycheck-credo ()
(use-package flycheck-credo
:defer t
:init (add-hook 'flycheck-mode-hook #'flycheck-credo-setup)))
(defun elixir/init-elixir-mode ()
(use-package elixir-mode
:defer t))
(defun elixir/post-init-flycheck ()
(spacemacs/enable-flycheck 'elixir-mode))
(defun elixir/pre-init-org ()
(spacemacs|use-package-add-hook org
:post-config (add-to-list 'org-babel-load-languages '(elixir . t))))
(defun elixir/init-ob-elixir ()
(spacemacs|use-package-add-hook org
:post-config
(use-package ob-elixir
:init (add-to-list 'org-babel-load-languages '(elixir . t)))))
(defun elixir/pre-init-popwin ()
(spacemacs|use-package-add-hook popwin
:post-config
(push '("*mix*" :tail t :noselect t) popwin:special-display-config)))
(defun elixir/pre-init-smartparens ()
(spacemacs|use-package-add-hook smartparens
:post-config
(progn
(sp-with-modes '(elixir-mode)
(sp-local-pair
"(" ")"
:unless '(:add spacemacs//elixir-point-after-fn-p))
(sp-local-pair
"fn" "end"
:when '(("SPC" "RET" "-" "("))
:post-handlers '(:add spacemacs//elixir-do-end-close-action)
:actions '(insert)))
(sp-with-modes '(elixir-mode)
(sp-local-pair
"do" "end"
:when '(("SPC" "RET"))
:post-handlers '(:add spacemacs//elixir-do-end-close-action)
:actions '(insert))))))
(defun elixir/post-init-ggtags ()
(add-hook 'elixir-mode-local-vars-hook #'spacemacs/ggtags-mode-enable))
(defun elixir/post-init-helm-gtags ()
(spacemacs/helm-gtags-define-keys-for-mode 'elixir-mode))