mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2024-11-24 07:20:37 +00:00
(glasses-mode): Update mode line at the end
of the function.
This commit is contained in:
parent
2a5405b668
commit
97f1dbede6
@ -257,7 +257,6 @@ recognized according to the current value of the variable `glasses-separator'."
|
||||
'glasses-mode)
|
||||
'help-echo "mouse-2: turn off Glasses mode")))
|
||||
|
||||
|
||||
;;;###autoload
|
||||
(defun glasses-mode (&optional arg)
|
||||
"Minor mode for making identifiers likeThis readable.
|
||||
@ -284,7 +283,8 @@ at places they belong to."
|
||||
(remove-hook 'after-change-functions 'glasses-change t)
|
||||
(remove-hook 'local-write-file-hooks
|
||||
'glasses-convert-to-unreadable t))))
|
||||
(setq glasses-mode new-flag))))
|
||||
(setq glasses-mode new-flag)
|
||||
(force-mode-line-update))))
|
||||
|
||||
|
||||
;;; Announce
|
||||
|
Loading…
Reference in New Issue
Block a user