github/doom-modeline
1
0
Fork 0
mirror of https://github.com/correl/doom-modeline.git synced 2024-11-23 19:19:50 +00:00
Code Issues Projects Releases Packages Wiki Activity

Monitor buffer-read-only for all operations.

Browse source
This commit is contained in:
Vincent Zhang 2019-03-28 16:25:35 +08:00
parent 262e42109c
commit 99a0bd9f12
2 changed files with 4 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
doom-modeline-segments.el
View file

@ -290,10 +290,9 @@ Uses `all-the-icons-material' to fetch the icon."
(when (>= emacs-major-version 26) (when (>= emacs-major-version 26)
(add-variable-watcher (add-variable-watcher
'buffer-read-only 'buffer-read-only
(lambda (_sym val op _where) (lambda (_sym val _op _where)
(when (eq op 'set) (setq buffer-read-only val)
(setq buffer-read-only val) (doom-modeline-update-buffer-file-state-icon)))
(doom-modeline-update-buffer-file-state-icon))))
(add-variable-watcher (add-variable-watcher
'doom-modeline-icon 'doom-modeline-icon

2
doom-modeline.el
View file

@ -4,7 +4,7 @@
;; Author: Vincent Zhang <seagle0128@gmail.com> ;; Author: Vincent Zhang <seagle0128@gmail.com>
;; Homepage: https://github.com/seagle0128/doom-modeline ;; Homepage: https://github.com/seagle0128/doom-modeline
;; Version: 1.9.5 ;; Version: 1.9.6
;; Package-Requires: ((emacs "25.1") (all-the-icons "1.0.0") (shrink-path "0.2.0") (eldoc-eval "0.1") (dash "2.11.0")) ;; Package-Requires: ((emacs "25.1") (all-the-icons "1.0.0") (shrink-path "0.2.0") (eldoc-eval "0.1") (dash "2.11.0"))
;; Keywords: faces mode-line ;; Keywords: faces mode-line