Run set-current-mode-icon when starting

Otherwise the currently visited buffer will not have the correct mode
icon set.
This commit is contained in:
Tom Willemse 2013-06-02 14:29:47 +02:00
parent 4252201783
commit 2aef75d781

View file

@ -91,7 +91,9 @@ ICON-SPEC should be a specification from `mode-icons'."
"Replace the name of the current major mode with an icon." "Replace the name of the current major mode with an icon."
:global t :global t
(if mode-icons-mode (if mode-icons-mode
(add-hook 'after-change-major-mode-hook 'set-current-mode-icon) (progn
(add-hook 'after-change-major-mode-hook 'set-current-mode-icon)
(set-current-mode-icon))
(remove-hook 'after-change-major-mode-hook 'set-current-mode-icon))) (remove-hook 'after-change-major-mode-hook 'set-current-mode-icon)))
(provide 'mode-icons) (provide 'mode-icons)