awesome-emacs/doomemacs
1
0
Fork 0
mirror of https://github.com/doomemacs/doomemacs synced 2025-08-11 13:07:28 -05:00
Code Issues Packages Projects Releases Wiki Activity

spaceline code clean up

Browse Source
This commit is contained in:
Henrik Lissner
2015-09-28 18:35:54 -04:00
parent 27d1bdf0b6
commit 648f1dd3dd
1 changed files with 2 additions and 8 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
core/core-ui.el
View File

@ -11,8 +11,8 @@
(blink-cursor-mode 1) ; do blink cursor (blink-cursor-mode 1) ; do blink cursor
(line-number-mode 1) ; do show line no in modeline (line-number-mode 1) ; do show line no in modeline
(column-number-mode 1) ; do show col no in modeline (column-number-mode 1) ; do show col no in modeline
(size-indication-mode 1) ; do show file size
(tooltip-mode -1) ; don't show tooltips (tooltip-mode -1) ; don't show tooltips
;; (size-indication-mode 1) ; do show file size
(setq-default (setq-default
;; Multiple cursors across buffers cause a strange redraw delay for ;; Multiple cursors across buffers cause a strange redraw delay for
@ -113,16 +113,10 @@
(let ((l (length path))) (substring path (- l max-length) l)))) (let ((l (length path))) (substring path (- l max-length) l))))
path))) path)))
(powerline-buffer-id))) (powerline-buffer-id)))
(if (buffer-modified-p) (propertize "*" 'font-lock-face '(:inherit powerline-active1 :foreground "orange"))) (if (buffer-modified-p) (propertize "*" 'font-lock-face '(:inherit mode-line :foreground "orange")))
" ") " ")
:tight-right t) :tight-right t)
(spaceline-define-segment narf-buffer-modified
"Buffer modified marker."
(if (buffer-modified-p) "*")
:face highlight-face
:tight t)
(spaceline-define-segment narf-buffer-encoding-abbrev (spaceline-define-segment narf-buffer-encoding-abbrev
"The line ending convention used in the buffer." "The line ending convention used in the buffer."
(let ((buf-coding (format "%s" buffer-file-coding-system))) (let ((buf-coding (format "%s" buffer-file-coding-system)))