diff options
| -rw-r--r-- | init.el | 25 |
1 files changed, 24 insertions, 1 deletions
| @@ -167,7 +167,30 @@ | |||
| 167 | :straight t | 167 | :straight t |
| 168 | :config | 168 | :config |
| 169 | (require 'exwm-config) | 169 | (require 'exwm-config) |
| 170 | (setq exwm-workspace-number 1) | 170 | (setq exwm-workspace-number 1 |
| 171 | exwm-input-prefix-keys '(?\C-h | ||
| 172 | ?\C-u | ||
| 173 | ?\C-x | ||
| 174 | ?\M-x | ||
| 175 | ?\M-` | ||
| 176 | ?\M-: | ||
| 177 | ?\M-&) | ||
| 178 | exwm-input-global-keys '(;; Reset EXWM to line-mode to regain control | ||
| 179 | ([?\s-r] . exwm-reset) | ||
| 180 | ;; Move between windows with Super + ESDF | ||
| 181 | ([?\s-e] . windmove-up) | ||
| 182 | ([?\s-d] . windmove-down) | ||
| 183 | ([?\s-s] . windmove-left) | ||
| 184 | ([?\s-f] . windmove-right) | ||
| 185 | ;; Launch applications via shell command | ||
| 186 | ([?\s-x] . (lambda (command) | ||
| 187 | (interactive (list (read-shell-command "$ "))) | ||
| 188 | (start-process-shell-command | ||
| 189 | command nil command))) | ||
| 190 | ;; Switch workspace | ||
| 191 | ([?\s-w] . exwm-workspace-switch) | ||
| 192 | ([?\s-`] . (lambda () (interactive) | ||
| 193 | (exwm-workspace-switch-create 0))))) | ||
| 171 | (exwm-enable)) | 194 | (exwm-enable)) |
| 172 | 195 | ||
| 173 | 196 | ||