awesome-emacs/doomemacs
1
0
Fork 0
mirror of https://github.com/doomemacs/doomemacs synced 2025-08-31 14:43:40 -05:00
Code Issues Packages Projects Releases Wiki Activity

tweak(everywhere): add icon to right of modeline

Browse Source 
This adds an icon to indicate that Emacs Everywhere is being used, to
ease at-a-glance identification. The "exit_to_app" material icon was
chosen as it seems like a good fit for a window that will return you to
the application it was invoked from. The padding on the right stops the
icon from being right up against the very edge of the window.
This commit is contained in:
TEC
2023-02-17 18:13:29 +08:00
committed by Henrik Lissner
parent 29c595ed1b
commit 7801c41c41
1 changed files with 8 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
modules/app/everywhere/config.el
View File

@@ -30,8 +30,14 @@
45 nil nil "…") 45 nil nil "…")
'face 'doom-modeline-buffer-minor-mode))) 'face 'doom-modeline-buffer-minor-mode)))
(doom-modeline-def-modeline 'emacs-everywhere (doom-modeline-def-modeline 'emacs-everywhere
'(bar modals emacs-everywhere buffer-position word-count parrot selection-info) '(bar modals emacs-everywhere buffer-position
'(input-method major-mode checker)) word-count parrot selection-info)
'(input-method major-mode checker
#("" 0 1 ; "Exit to app" icon + a little padding
(rear-nonsticky t
display (raise -0.25)
face (:inherit doom-modeline-emphasis :family "Material Icons" :height 1.1)
help-echo "This is an Emacs Everywhere window"))))
(add-hook! 'emacs-everywhere-mode-hook (add-hook! 'emacs-everywhere-mode-hook
(defun +everywhere-set-modeline () (defun +everywhere-set-modeline ()
(doom-modeline-set-modeline 'emacs-everywhere)))) (doom-modeline-set-modeline 'emacs-everywhere))))