e0b751bee3
Replace push with add-to-list in layer init functions and related code. Modify spacemacs|add-toggle to check for and update an existing toggle in spacemacs-toggles and only create a new toggle if none already existed. Replace a conditional push onto erc-packages with use of :toggle. When initializing which-key, set which-key-replacement-alist to its default or customized setting before adding all the Spacemacs replacements. We want to keep the stock replacements but avoid adding duplicates of the Spacemacs replacements. Replace the emacs-lisp-mode-hook lambda with a named function to avoid adding duplicate hooks (which can add duplicate definitions of the evil-surround pair).
63 lines
1.9 KiB
EmacsLisp
63 lines
1.9 KiB
EmacsLisp
;;; packages.el --- d Layer packages File for Spacemacs
|
|
;;
|
|
;; Copyright (c) 2012-2018 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
|
|
|
|
;; List of all packages to install and/or initialize. Built-in packages
|
|
;; which require an initialization must be listed explicitly in the list.
|
|
(setq d-packages
|
|
'(
|
|
company
|
|
(company-dcd :requires company)
|
|
d-mode
|
|
flycheck
|
|
(flycheck-dmd-dub :requires flycheck)
|
|
ggtags
|
|
counsel-gtags
|
|
helm-gtags
|
|
))
|
|
|
|
(defun d/post-init-company ()
|
|
;; Need to convince company that this C-derived mode is a code mode.
|
|
(with-eval-after-load 'company-dabbrev-code
|
|
(add-to-list 'company-dabbrev-code-modes 'd-mode)))
|
|
|
|
(defun d/init-company-dcd ()
|
|
(use-package company-dcd
|
|
:defer t
|
|
:init
|
|
(progn
|
|
(spacemacs|add-company-backends :backends company-dcd :modes d-mode)
|
|
(spacemacs/set-leader-keys-for-major-mode 'd-mode
|
|
"gg" 'company-dcd-goto-definition
|
|
"gb" 'company-dcd-goto-def-pop-marker
|
|
"hh" 'company-dcd-show-ddoc-with-buffer
|
|
"gr" 'company-dcd-ivy-search-symbol))))
|
|
|
|
(defun d/init-d-mode ()
|
|
(use-package d-mode :defer t))
|
|
|
|
(defun d/post-init-flycheck ()
|
|
(spacemacs/enable-flycheck 'd-mode))
|
|
|
|
(defun d/init-flycheck-dmd-dub ()
|
|
(use-package flycheck-dmd-dub :defer t
|
|
:init
|
|
(progn
|
|
(add-hook 'd-mode-hook 'flycheck-dmd-dub-set-include-path)
|
|
(add-hook 'd-mode-hook 'flycheck-dmd-dub-set-variables))))
|
|
|
|
(defun d/post-init-ggtags ()
|
|
(add-hook 'd-mode-local-vars-hook #'spacemacs/ggtags-mode-enable))
|
|
|
|
(defun d/post-init-counsel-gtags ()
|
|
(spacemacs/counsel-gtags-define-keys-for-mode 'd-mode))
|
|
|
|
(defun d/post-init-helm-gtags ()
|
|
(spacemacs/helm-gtags-define-keys-for-mode 'd-mode))
|