50 lines
1.5 KiB
EmacsLisp
50 lines
1.5 KiB
EmacsLisp
;;; languages/elixir -- summary
|
|
;;; Commentary:
|
|
;;; Code:
|
|
|
|
(require '+custom-pkg-prog-mode "$HOME/.emacs.d/pkg/prog-mode.el")
|
|
(require '+custom-pkg-flycheck "$HOME/.emacs.d/pkg/flycheck.el")
|
|
(require '+custom-pkg-hydra "$HOME/.emacs.d/pkg/hydra.el")
|
|
|
|
(use-package elixir-mode
|
|
:requires (lsp-mode lsp-ui)
|
|
:straight t)
|
|
|
|
(defhydra my-elixir/context-hydra (:color teal :hint nil)
|
|
"
|
|
^ Elixir actions
|
|
^^^^^^^^--------------------------------------------------------------------------------------------
|
|
Buffer: _r_: Reload _f_: Format _i_: Indent _e_: Show Errors
|
|
Other: _m_: iMenu
|
|
^^
|
|
"
|
|
("q" nil "cancel" :color blue)
|
|
("r" revert-buffer-no-confirm)
|
|
("i" mark-and-indent-whole-buffer)
|
|
("f" elixir-format)
|
|
("e" flycheck-list-errors)
|
|
("m" lsp-ui-imenu))
|
|
|
|
(defun activate-elixir-mode ()
|
|
"All things Elixir."
|
|
(set-indent 2)
|
|
(column-enforce-n 98)
|
|
(lsp)
|
|
(setq-local flycheck-check-syntax-automatically '(save mode-enabled))
|
|
(setq-local lsp-eldoc-enable-hover nil)
|
|
(setq-local company-minimum-prefix-length 3)
|
|
(define-key elixir-mode-map (kbd "<f17>") 'elixir-format)
|
|
|
|
;; If needed, switch the one below to false to disable documentation pop-ups
|
|
;; (setq-local lsp-ui-doc-enable t)
|
|
|
|
(define-key elixir-mode-map (kbd "C-c l") 'my-elixir/context-hydra/body)
|
|
|
|
;; Company list override
|
|
(add-to-list (make-local-variable 'company-backends)
|
|
'(company-capf company-yasnippet)))
|
|
|
|
(add-hook 'elixir-mode-hook 'activate-elixir-mode)
|
|
|
|
(provide '+custom-lang-elixir)
|
|
;;; elixir.el ends here
|