sqrtminusone/dotfiles
1
0
Fork 0
mirror of https://github.com/SqrtMinusOne/dotfiles.git synced 2025-12-11 19:45:25 +03:00
Code Issues Projects Releases Packages Wiki Activity Actions

feat(exwm): confirm on create workspace

Browse source
This commit is contained in:
Pavel Korytov 2022-04-19 20:36:47 +03:00
parent 4d10d68737
commit 86bb113b32
2 changed files with 6 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
.emacs.d/desktop.el
View file

@ -508,7 +508,9 @@ _d_: Discord
`(,(kbd (format "s-%d" i)) . `(,(kbd (format "s-%d" i)) .
(lambda () (lambda ()
(interactive) (interactive)
(exwm-workspace-switch-create ,i)))) (when (or (< ,i (exwm-workspace--count))
(y-or-n-p (format "Create workspace %d" ,i)))
(exwm-workspace-switch-create ,i) ))))
(number-sequence 0 9)))) (number-sequence 0 9))))
(defun exwm-input--fake-last-command () (defun exwm-input--fake-last-command ()

4
Desktop.org
View file

@ -987,7 +987,9 @@ And keybindings that are available in both =char-mode= and =line-mode=:
`(,(kbd (format "s-%d" i)) . `(,(kbd (format "s-%d" i)) .
(lambda () (lambda ()
(interactive) (interactive)
(exwm-workspace-switch-create ,i)))) (when (or (< ,i (exwm-workspace--count))
(y-or-n-p (format "Create workspace %d" ,i)))
(exwm-workspace-switch-create ,i) ))))
(number-sequence 0 9)))) (number-sequence 0 9))))
#+end_src #+end_src