jessieh/mood-line
jessieh/mood-line
1
Fork 2
Code Issues 6 Pull Requests 1 Releases Activity

Merge branch 'unify-text-style' into 'master'

Browse Source 
Stop setting unimportant face to cursor point and misc info

See merge request jessieh/mood-line!8
This commit is contained in:
Alynx Zhou 2023-10-19 22:11:54 +00:00
commit 6ab8e11290
1 changed files with 3 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
mood-line.el
View File

@ -706,10 +706,8 @@ Checkers checked, in order: `flycheck', `flymake'."
"Display the position of the cursor in the current buffer." "Display the position of the cursor in the current buffer."
(concat "%l:%c" (concat "%l:%c"
(when mood-line-show-cursor-point (when mood-line-show-cursor-point
(propertize (format ":%d" (point)) (format ":%d" (point)))
'face 'mood-line-unimportant)) " %p%% "))
(propertize " %p%% "
'face 'mood-line-unimportant)))
;; ---------------------------------- ;; ;; ---------------------------------- ;;
;; EOL segment ;; EOL segment
@ -760,8 +758,7 @@ Checkers checked, in order: `flycheck', `flymake'."
"Display the current value of `mode-line-misc-info'." "Display the current value of `mode-line-misc-info'."
(let ((misc-info (format-mode-line mode-line-misc-info))) (let ((misc-info (format-mode-line mode-line-misc-info)))
(unless (string-blank-p misc-info) (unless (string-blank-p misc-info)
(concat (propertize (string-trim misc-info) (concat (string-trim misc-info)
'face 'mood-line-unimportant)
" ")))) " "))))
;; ---------------------------------- ;; ;; ---------------------------------- ;;