(defpackage #:config.keybinds (:use #:cl #:config #:stumpwm)) (in-package #:config.keybinds) (load "~/.stumpwm.d/commands.lisp") (set-prefix-key (kbd "C-z")) (define-key *top-map* (kbd "XF86AudioRaiseVolume") "exec wpctl set-volume @DEFAULT_AUDIO_SINK@ 5%+") (define-key *top-map* (kbd "XF86AudioLowerVolume") "exec wpctl set-volume @DEFAULT_AUDIO_SINK@ 5%-") (define-key *top-map* (kbd "XF86AudioMute") "exec wpctl set-mute @DEFAULT_AUDIO_SINK@ toggle") (define-key *top-map* (kbd "XF86AudioNext") "exec mpc next") (define-key *top-map* (kbd "XF86AudioPrev") "exec mpc prev") (define-key *top-map* (kbd "XF86AudioPlay") "exec mpc toggle") (define-key *top-map* (kbd "s-h") "move-focus left") (define-key *top-map* (kbd "s-j") "move-focus down") (define-key *top-map* (kbd "s-k") "move-focus up") (define-key *top-map* (kbd "s-l") "move-focus right") (define-key *top-map* (kbd "s-H") "exchange-direction left") (define-key *top-map* (kbd "s-J") "exchange-direction down") (define-key *top-map* (kbd "s-K") "exchange-direction up") (define-key *top-map* (kbd "s-L") "exchange-direction right") (define-key *top-map* (kbd "s-C") "delete") (define-key *top-map* (kbd "s-Return") "exec urxvtc") (define-key *top-map* (kbd "s-z") "exec boomer") (define-key *top-map* (kbd "s-Print") "exec scrot -s -e 'mv $f ~/pics/'") (define-key *top-map* (kbd "Print") "exec scrot -u -e 'mv $f ~/pics/'") (define-key *top-map* (kbd "s-b") "exec bm -o") (define-key *top-map* (kbd "s-B") "exec bm -y") (define-key *root-map* (kbd "C-f") "exec firefox -P default-release") (define-key *root-map* (kbd "C-F") "exec firefox -P less-strict") (define-key *root-map* (kbd "C-e") "exec emacsclient -c -a ''") (define-key *root-map* (kbd "C-m") "exec mpdmenu") (define-key *root-map* (kbd "C-.") "exec dmenu_run -m 0 -fn 'xft:Hack Nerd Font:size=11' -nb '#222222' -nf '#bbbbbb' -sb '#005577' -sf '#eeeeee'") (define-key *root-map* (kbd "C-v") "get-current-volume") (define-key *root-map* (kbd "C-t") "get-current-temp") (define-key *root-map* (kbd "C-a") "print-calendar")