23 lines
765 B
Common Lisp
23 lines
765 B
Common Lisp
;; Start Kitty
|
|
(stumpwm:define-key stumpwm:*root-map* (stumpwm:kbd "c") "exec kitty")
|
|
(stumpwm:define-key stumpwm:*root-map* (stumpwm:kbd "C-c") "exec kitty")
|
|
|
|
;; Start Qutebrowser
|
|
(stumpwm:define-key stumpwm:*root-map* (stumpwm:kbd "w") "exec qutebrowser")
|
|
(stumpwm:define-key stumpwm:*root-map* (stumpwm:kbd "C-w") "exec qutebrowser")
|
|
|
|
;; ;; Move window and focus
|
|
;; (define-interactive-keymap move-window nil
|
|
;; ((kbd "h") "move-focus left")
|
|
;; ((kbd "j") "move-focus down")
|
|
;; ((kbd "k") "move-focus up")
|
|
;; ((kbd "l") "move-focus right")
|
|
;; ((kbd "H") "move-window left")
|
|
;; ((kbd "J") "move-window down")
|
|
;; ((kbd "K") "move-window up")
|
|
;; ((kbd "L") "move-window right"))
|
|
|
|
;; Restart StumpWM
|
|
(define-key *root-map* (kbd "O") "restart-soft")
|
|
|