spacemacs/init-package/init-diminish.el

58 lines
1.6 KiB
EmacsLisp

(require 'diminish)
;; Major modes abbrev --------------------------------------------------------
(add-hook 'emacs-lisp-mode-hook
(lambda ()
(setq mode-name "Elisp |")))
(add-hook 'erlang-mode-hook
(lambda ()
(setq mode-name "Erl |")))
(add-hook 'python-mode-hook
(lambda ()
(setq mode-name "Py |")))
;; Minor modes abbrev --------------------------------------------------------
(when (display-graphic-p)
(eval-after-load "auto-complete"
'(diminish 'auto-complete-mode "[☂]"))
(eval-after-load "autopair"
'(diminish 'autopair-mode "[⒜]"))
(eval-after-load "centered-cursor-mode"
'(diminish 'centered-cursor-mode "[⊙]"))
(eval-after-load "eproject"
'(diminish 'eproject-mode "[⚑²]"))
(eval-after-load "projectile"
'(diminish 'projectile-mode "[⚑]"))
(eval-after-load "flymake"
'(diminish 'flymake-mode "[⇨]"))
(eval-after-load "flyspell"
'(diminish 'flyspell-mode "[abc]"))
(eval-after-load "paredit"
'(diminish 'paredit-mode "[⒫]"))
(eval-after-load "tagedit"
'(diminish 'tagedit-mode "[⒯]"))
(eval-after-load "yasnippet"
'(diminish 'yas-minor-mode "[♻]"))
)
;; Minor Mode (hidden) ------------------------------------------------------
(eval-after-load 'elisp-slime-nav
'(diminish 'elisp-slime-nav-mode))
(eval-after-load "hi-lock"
'(diminish 'hi-lock-mode))
(eval-after-load "rainbow-mode"
'(diminish 'rainbow-mode))
(eval-after-load "undo-tree"
'(diminish 'undo-tree-mode))
(eval-after-load "helm-mode"
'(diminish 'helm-mode))