diff options
Diffstat (limited to 'emacs/inits/00-exwm.el')
| -rw-r--r-- | emacs/inits/00-exwm.el | 11 |
1 files changed, 5 insertions, 6 deletions
diff --git a/emacs/inits/00-exwm.el b/emacs/inits/00-exwm.el index 7735629..4d503f5 100644 --- a/emacs/inits/00-exwm.el +++ b/emacs/inits/00-exwm.el @@ -1,4 +1,4 @@ -;; Time-stamp: <2020-04-21 19:17:12 (tslil@bison)> +;; Time-stamp: <2020-04-24 17:52:54 (tslil@bison)> (defun banish-rat () (interactive) @@ -72,12 +72,10 @@ (defun exwm-workspace-lighter () (format " @%d (*%d)" exwm-workspace-current-index exwm-workspace-last-index)) - (defun exwm-store-workspace-last-index (next) - (when (/= next exwm-workspace-current-index) - (setq exwm-workspace-last-index exwm-workspace-current-index))) + (defun exwm-store-workspace-last-index-switch (frame-or-index &optional force) + (setq exwm-workspace-last-index exwm-workspace-current-index)) - (advice-add 'exwm-workspace-switch-create :before #'exwm-store-workspace-last-index) - ;; (advice-add 'exwm-workspace-switch :before #'exwm-store-workspace-last-index) + (advice-add 'exwm-workspace-switch :before #'exwm-store-workspace-last-index-switch) (defun exwm-sanitise-workspace-last-index () (when (> (1+ exwm-workspace-last-index) (exwm-workspace--count)) @@ -117,6 +115,7 @@ (require 'exwm-systemtray) (exwm-systemtray-enable) + (setq exwm-systemtray-height 24) ;; ------------------------------------------------------------------- ;; RandR |