move diminish to spacemacs-bootstrap

Also cleanup diminish init function
This commit is contained in:
syl20bnr 2016-05-14 11:41:30 -04:00
parent 73d48338c8
commit bb2e582703
3 changed files with 11 additions and 22 deletions

View File

@ -11,8 +11,8 @@
(setq spacemacs-base-packages
'(
(abbrev :location built-in)
(bookmark :location built-in)
diminish
(dired :location built-in)
(dired-x :location built-in)
(electric-indent-mode :location built-in)
@ -28,6 +28,7 @@
help-fns+
hl-todo
(hs-minor-mode :location built-in)
(hi-lock :location built-in)
(holy-mode :location local :step pre)
(hybrid-mode :location local :step pre)
(ido :location built-in)
@ -55,6 +56,9 @@
;; Initialization of packages
(defun spacemacs-base/init-abbrev ()
(spacemacs|hide-lighter abbrev-mode))
(defun spacemacs-base/init-bookmark ()
(use-package bookmark
:defer t
@ -65,27 +69,6 @@
bookmark-save-flag 1)
(spacemacs/set-leader-keys "fb" 'bookmark-jump))))
(defun spacemacs-base/init-diminish ()
(use-package diminish
:init
(progn
;; Minor modes abbrev --------------------------------------------------------
(when (display-graphic-p)
(with-eval-after-load 'eproject
(diminish 'eproject-mode " eⓅ"))
(with-eval-after-load 'flymake
(diminish 'flymake-mode " Ⓕ2")))
;; Minor Mode (hidden) ------------------------------------------------------
(with-eval-after-load 'elisp-slime-nav
(diminish 'elisp-slime-nav-mode))
(with-eval-after-load 'hi-lock
(diminish 'hi-lock-mode))
(with-eval-after-load 'abbrev
(diminish 'abbrev-mode))
(with-eval-after-load 'subword
(when (eval-when-compile (version< "24.3.1" emacs-version))
(diminish 'subword-mode))))))
(defun spacemacs-base/init-dired ()
(spacemacs/set-leader-keys
"ad" 'dired
@ -227,6 +210,8 @@
(hs-minor-mode)
(spacemacs|hide-lighter hs-minor-mode)))
(add-hook 'prog-mode-hook 'spacemacs//enable-hs-minor-mode))
(defun spacemacs-base/init-hi-lock ()
(spacemacs|hide-lighter hi-lock-mode))
(defun spacemacs-base/init-holy-mode ()
(use-package holy-mode

View File

@ -15,6 +15,7 @@
(bind-map :step bootstrap)
(bind-key :step bootstrap)
(dash :step bootstrap)
(diminish :step bootstrap)
(evil :step bootstrap)
(f :step bootstrap)
(hydra :step bootstrap)
@ -29,6 +30,8 @@
(defun spacemacs-bootstrap/init-bind-key ())
(defun spacemacs-bootstrap/init-diminish ())
(defun spacemacs-bootstrap/init-bind-map ()
(require 'bind-map)
(bind-map spacemacs-default-map

View File

@ -71,6 +71,7 @@
;; Elisp go-to-definition with M-. and back again with M-,
(use-package elisp-slime-nav
:defer t
:diminish elisp-slime-nav-mode
:init
(progn
(add-hook 'emacs-lisp-mode-hook 'elisp-slime-nav-mode)