emenel/doomemacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

setq -> setq-default (whoops); improve modeline config

Browse source
This commit is contained in:
Henrik Lissner 2016-10-05 12:51:56 +02:00
parent 823dc07dc9
commit 62d220d863
1 changed files with 5 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

7
core/core-modeline.el
View file

@ -401,9 +401,10 @@ lines are selected, or the NxM dimensions of a block selection."
" " " "
,(if (eq id 'scratch) ,(if (eq id 'scratch)
'(*buffer-project) '(*buffer-project)
'(*buffer-info)) (if (eq id 'media)
,(if (eq id 'media)
'(*media-info) '(*media-info)
'(*buffer-info)))
,(unless (eq id 'media)
'(list " %l:%c %p " '(list " %l:%c %p "
(*selection-info) (*selection-info)
(*flycheck))))) (*flycheck)))))
@ -416,7 +417,7 @@ lines are selected, or the NxM dimensions of a block selection."
,(+ 1 (string-width (format-mode-line rhs))))))))) ,(+ 1 (string-width (format-mode-line rhs)))))))))
(list lhs mid rhs)))) (list lhs mid rhs))))
(setq mode-line-format (doom-modeline)) (setq-default mode-line-format (doom-modeline))
(add-hook! image-mode (add-hook! image-mode
(setq mode-line-format (doom-modeline 'media))) (setq mode-line-format (doom-modeline 'media)))