[Emacs] Fix moving windows in EXWM
All checks were successful
continuous-integration/drone/push Build is passing
All checks were successful
continuous-integration/drone/push Build is passing
This commit is contained in:
parent
55b404437d
commit
1091aba3a8
@ -3398,7 +3398,11 @@ workspaces 0 to 9.
|
|||||||
`(,(kbd (format "s-%d" i)) .
|
`(,(kbd (format "s-%d" i)) .
|
||||||
(lambda ()
|
(lambda ()
|
||||||
(interactive)
|
(interactive)
|
||||||
(exwm-workspace-move-window ,i))))
|
(exwm-workspace-move-window ,(let ((index (1- i)))
|
||||||
|
(if (< index 0)
|
||||||
|
(- 10 index)
|
||||||
|
;; FIXME: does not work with s-0
|
||||||
|
index))))))
|
||||||
(number-sequence 0 9))))
|
(number-sequence 0 9))))
|
||||||
#+end_src
|
#+end_src
|
||||||
|
|
||||||
|
Loading…
Reference in New Issue
Block a user