diff options
| author | benjamin <benjamin.lindqvist@gmail.com> | 2018-01-17 21:10:44 +0100 |
|---|---|---|
| committer | benjamin <benjamin.lindqvist@gmail.com> | 2018-01-17 21:10:44 +0100 |
| commit | 46c2226c948d743c94b60972d26ccd6f140e25ff (patch) | |
| tree | 69e553656a42b05944cd16748e60d74beefc52e9 | |
| parent | 10c69fe7bbfcfdfefbc954b7ed7b1c84cf154b1a (diff) | |
Added indicator that file has been modified after last save
| -rw-r--r-- | feebleline.el | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/feebleline.el b/feebleline.el index c72c942..b3ed860 100644 --- a/feebleline.el +++ b/feebleline.el @@ -67,6 +67,9 @@ (defface feebleline-filename-face '((t :foreground "#fce94e")) "Feebleline filename face." :group 'feebleline-mode) +(defface feebleline-asterisk-face '((t :foreground "salmon")) + "Feebleline filename face." + :group 'feebleline-mode) ;; Note: ugly parentheses, for the simple reason that it makes it easier to ;; transpose, add and comment out lines. @@ -77,7 +80,8 @@ ("%s" ("," ) (face default)) ("%s) " ((current-column)) (face feebleline-linum-face)) ("%s" ("") (face default)) - ("%s " ((buffer-file-name)) (face feebleline-filename-face)) + ("%s" ((buffer-file-name)) (face feebleline-filename-face)) + ("%s" ((if (buffer-modified-p) "*" "" )) (face feebleline-asterisk-face)) ) "Each element is a list with the following format: |