TakeV/spacemacs
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

spaceline: define toggles at init time

Browse source
This commit is contained in:
syl20bnr 2018-06-14 09:33:33 -04:00
parent 31324f68bb
commit 33c62b7d60
1 changed files with 15 additions and 15 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

30
layers/+spacemacs/spacemacs-modeline/packages.el
View file

@ -66,21 +66,6 @@
(spaceline-compile))
:documentation "Make the mode-line responsive."
:evil-leader "tmr")
(setq powerline-default-separator
(cond
((spacemacs-is-dumping-p) 'utf-8)
((memq (spacemacs/get-mode-line-theme-name)
'(spacemacs custom))
(spacemacs/mode-line-separator))
(t 'wave))
powerline-image-apple-rgb (eq window-system 'ns)
powerline-scale (or (spacemacs/mode-line-separator-scale) 1.5)
powerline-height (spacemacs/compute-mode-line-height)))
:config
(progn
(spacemacs/customize-powerline-faces)
(setq spaceline-org-clock-p nil
spaceline-highlight-face-func 'spacemacs//evil-state-face)
;; Segment toggles
(dolist (spec '((minor-modes "tmm")
(major-mode "tmM")
@ -98,6 +83,21 @@
(replace-regexp-in-string
"-" " " (format "%S" segment)))
:evil-leader ,(cadr spec)))))
(setq powerline-default-separator
(cond
((spacemacs-is-dumping-p) 'utf-8)
((memq (spacemacs/get-mode-line-theme-name)
'(spacemacs custom))
(spacemacs/mode-line-separator))
(t 'wave))
powerline-image-apple-rgb (eq window-system 'ns)
powerline-scale (or (spacemacs/mode-line-separator-scale) 1.5)
powerline-height (spacemacs/compute-mode-line-height)))
:config
(progn
(spacemacs/customize-powerline-faces)
(setq spaceline-org-clock-p nil
spaceline-highlight-face-func 'spacemacs//evil-state-face)
;; unicode
(let ((unicodep (dotspacemacs|symbol-value
dotspacemacs-mode-line-unicode-symbols)))