mirror of
https://github.com/emacs-exwm/exwm.git
synced 2024-11-27 14:57:59 +01:00
Fix EXWM buffers not being hidden on workspace switch
* exwm-workspace.el (exwm-workspace-switch, exwm-workspace-move-window): Use `equal' to compare RandR output names.
This commit is contained in:
parent
dbc06b50ff
commit
0d1a323124
1 changed files with 5 additions and 5 deletions
|
@ -536,7 +536,7 @@ for internal use only."
|
|||
(cond
|
||||
((not active-old)
|
||||
(exwm-workspace--set-active frame t))
|
||||
((eq output-old output-new)
|
||||
((equal output-old output-new)
|
||||
(exwm-workspace--set-active old-frame nil)
|
||||
(exwm-workspace--set-active frame t)
|
||||
(setq workspaces-to-hide (list old-frame)))
|
||||
|
@ -544,7 +544,7 @@ for internal use only."
|
|||
(t
|
||||
(dolist (w exwm-workspace--list)
|
||||
(when (and (exwm-workspace--active-p w)
|
||||
(eq output-new
|
||||
(equal output-new
|
||||
(frame-parameter w 'exwm-randr-output)))
|
||||
(exwm-workspace--set-active w nil)
|
||||
(setq workspaces-to-hide (append workspaces-to-hide (list w)))))
|
||||
|
@ -756,7 +756,7 @@ INDEX must not exceed the current number of workspaces."
|
|||
;; Floating.
|
||||
(setq container (frame-parameter exwm--floating-frame
|
||||
'exwm-container))
|
||||
(unless (eq (frame-parameter old-frame 'exwm-randr-output)
|
||||
(unless (equal (frame-parameter old-frame 'exwm-randr-output)
|
||||
(frame-parameter frame 'exwm-randr-output))
|
||||
(with-slots (x y)
|
||||
(xcb:+request-unchecked+reply exwm--connection
|
||||
|
|
Loading…
Reference in a new issue