[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/exwm b75c89c: Fix systemtray position when menu-bar / t
From: |
Chris Feng |
Subject: |
[elpa] externals/exwm b75c89c: Fix systemtray position when menu-bar / tool-bar is enabled |
Date: |
Sun, 27 May 2018 11:31:54 -0400 (EDT) |
branch: externals/exwm
commit b75c89cae2a1c4c70044f885c44a95fd2f9950dd
Author: Chris Feng <address@hidden>
Commit: Chris Feng <address@hidden>
Fix systemtray position when menu-bar / tool-bar is enabled
* exwm-systemtray.el (exwm-systemtray--on-workspace-switch)
(exwm-systemtray--on-randr-refresh): Take menu-bar / tool-bar into
account when placing systemtray.
---
exwm-systemtray.el | 8 ++------
1 file changed, 2 insertions(+), 6 deletions(-)
diff --git a/exwm-systemtray.el b/exwm-systemtray.el
index dea5dbb..ba1e388 100644
--- a/exwm-systemtray.el
+++ b/exwm-systemtray.el
@@ -330,9 +330,7 @@ You shall use the default value if using auto-hide
minibuffer."
(frame-parameter exwm-workspace--current
'window-id))
:x 0
- :y (- (elt (elt exwm-workspace--workareas
- exwm-workspace-current-index)
- 3)
+ :y (- (frame-pixel-height exwm-workspace--current)
exwm-systemtray-height))))
(exwm-systemtray--refresh))
@@ -343,9 +341,7 @@ You shall use the default value if using auto-hide
minibuffer."
(make-instance 'xcb:ConfigureWindow
:window exwm-systemtray--embedder
:value-mask xcb:ConfigWindow:Y
- :y (- (elt (elt exwm-workspace--workareas
- exwm-workspace-current-index)
- 3)
+ :y (- (frame-pixel-height exwm-workspace--current)
exwm-systemtray-height))))
(exwm-systemtray--refresh))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [elpa] externals/exwm b75c89c: Fix systemtray position when menu-bar / tool-bar is enabled,
Chris Feng <=