awesome-emacs/doomemacs
1
0
Fork 0
mirror of https://github.com/doomemacs/doomemacs synced 2025-08-03 12:27:26 -05:00
Code Issues Packages Projects Releases Wiki Activity

Don't set mode-line if format doesn't exist

Browse Source
This commit is contained in:
Henrik Lissner
2018-07-10 21:48:52 +02:00
parent 0cd32b5f1d
commit ba4d72713a
1 changed files with 7 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

13
modules/ui/doom-modeline/+new.el
View File

@ -209,12 +209,13 @@
(defun set-modeline! (name &optional default) (defun set-modeline! (name &optional default)
(let ((modeline (cdr (assq name doom-mode-line-alist)))) (let ((modeline (cdr (assq name doom-mode-line-alist))))
(if default (when modeline
(setq-default mode-line-format-left `("" ,@(car modeline)) (if default
mode-line-format-right `("" ,@(cadr modeline))) (setq-default mode-line-format-left `("" ,@(car modeline))
(setq mode-line-format-left `("" ,@(car modeline)) mode-line-format-right `("" ,@(cadr modeline)))
mode-line-format-right `("" ,@(cadr modeline)))) (setq mode-line-format-left `("" ,@(car modeline))
(force-mode-line-update))) mode-line-format-right `("" ,@(cadr modeline))))
(force-mode-line-update))))
;; ;;