mirror of
https://github.com/ch11ng/exwm.git
synced 2024-11-30 14:38:00 +01:00
Allow switch to normal buffers in exwm-workspace-switch-to-window
* exwm-workspace.el (exwm-workspace-switch-to-window): Allow switch to normal buffers.
This commit is contained in:
parent
3f2f844569
commit
1d435157d3
1 changed files with 5 additions and 4 deletions
|
@ -219,10 +219,11 @@ The optional FORCE option is for internal use only."
|
|||
(let ((buffer (read-buffer "Switch to window: " nil t)))
|
||||
(when buffer
|
||||
(with-current-buffer buffer
|
||||
(when (and (eq major-mode 'exwm-mode)
|
||||
(if (and (eq major-mode 'exwm-mode)
|
||||
(not (eq exwm--frame exwm-workspace--current)))
|
||||
(exwm-workspace-move-window exwm-workspace-current-index
|
||||
exwm--id)))))
|
||||
exwm--id)
|
||||
(switch-to-buffer buffer)))))
|
||||
;; Hide buffers on other workspaces
|
||||
(dolist (pair exwm--id-buffer-alist)
|
||||
(with-current-buffer (cdr pair)
|
||||
|
|
Loading…
Reference in a new issue