X-Git-Url: http://47.100.26.94:8080/?a=blobdiff_plain;f=emacs.d%2Fconfig.org;h=f0a8f95d7480dbd532fe5b27e7c5d441dd469120;hb=4b5702e69a2a4b3812abcb8302df2d52275f6e07;hp=1b0eb737637c247604943e93a8daa753c6febcbc;hpb=5f3746291aaee99386c4dd11f261aa6dce075c06;p=dotfiles.git diff --git a/emacs.d/config.org b/emacs.d/config.org index 1b0eb73..f0a8f95 100644 --- a/emacs.d/config.org +++ b/emacs.d/config.org @@ -437,7 +437,7 @@ Revised powerline-center-theme :group 'powerline) ;; Don't show buffer modified for scratch and eshell mode - (defun sd/buffer-show-modified () + (defun sd/buffer-is-eshel-or-scratch () "Dot not show modified indicator for buffers" (interactive) (unless (or (string-match "*scratch*" (buffer-name)) @@ -454,7 +454,7 @@ Revised powerline-center-theme (mode-line-buffer-id (if active 'sd/mode-line-buffer-id 'mode-line-buffer-id-inactive)) (mode-line (if active 'mode-line 'mode-line-inactive)) (my-face1 (if active 'sd/powerline-active1 'powerline-inactive1)) - (my-face-buffer-modified (if (and (sd/buffer-show-modified) (buffer-modified-p)) + (my-face-buffer-modified (if (and (sd/buffer-is-eshel-or-scratch) (buffer-modified-p) (not buffer-read-only)) 'sd/buffer-modified-active1 (if buffer-read-only 'sd/buffer-view-active1 my-face1)))