Compare commits

..

3 Commits

Author SHA1 Message Date
598be98640
Remove now used smart-mode-line package 2025-06-07 19:25:02 +02:00
fef218ec94
Show project information in mode-line 2025-06-07 19:24:45 +02:00
fccbbd8509
Colorize Org clock mode-line display according to theme
Do not use a custom face setting here.
2025-06-07 19:23:50 +02:00
3 changed files with 6 additions and 9 deletions

11
init.el
View File

@ -305,9 +305,10 @@
proced-enable-color-flag t))
(use-package project
:init (setq project-list-file (expand-file-name "projects" emacs-d-userdata)
:init (setopt project-list-file (expand-file-name "projects" emacs-d-userdata)
project-switch-commands 'project-dired
project-vc-merge-submodules nil)
project-vc-merge-submodules nil
project-mode-line t)
:config (progn
;; Sort known projects before persisting, to reduce committer noise
@ -2139,12 +2140,6 @@ Note that this workaround is incomplete, as explained in this comment."
solarized-use-variable-pitch nil
solarized-high-contrast-mode-line nil))
(use-package smart-mode-line
:ensure t
:init (setq sml/mode-width 'full
sml/name-width 30)
:commands (sml/setup))
(use-package moody
:ensure t
:commands (moody-replace-mode-line-buffer-identification

View File

@ -18,6 +18,7 @@ Known to work well with the `solarized-dark theme.")
'(org-column ((t (:strike-through nil :underline nil :slant normal :weight normal))))
'(org-headline-done ((t (:foreground "#859900"))))
'(org-link ((t (:inherit link :weight normal))))
'(org-mode-line-clock ((t (:inherit default))))
'(outline-4 ((t (:inherit org-level-4))))
'(flyspell-duplicate ((t (:underline (:color "orange red" :style wave)))))
'(flyspell-incorrect ((t (:underline (:color "orange red" :style wave)))))

View File

@ -18,6 +18,7 @@
'(org-column ((t (:strike-through nil :underline nil :slant normal :weight normal :height 110 :family "DejaVu Sans Mono"))))
'(org-headline-done ((t (:foreground "#859900"))))
'(org-link ((t (:inherit link :weight normal))))
'(org-mode-line-clock ((t (:inherit default))))
'(outline-4 ((t (:inherit org-level-4))))
'(flyspell-duplicate ((t (:underline (:color "orange red" :style wave)))))
'(flyspell-incorrect ((t (:underline (:color "orange red" :style wave)))))