dotfiles

config files and scripts at HOME.
git clone git://git.ricketyspace.net/dotfiles.git
Log | Files | Refs

commit cc585a06249369cdeaf3498ac92bea2759a48ffc
parent c29f06d1232dca7e6c82c4aa9ee240f84188d8b2
Author: rsiddharth <s@ricketyspace.net>
Date:   Wed,  2 May 2018 03:19:05 +0000

Update .stumpwmrc.

Diffstat:
.stumpwmrc | 21++-------------------
1 file changed, 2 insertions(+), 19 deletions(-)

diff --git a/.stumpwmrc b/.stumpwmrc @@ -39,43 +39,26 @@ ;; commands (defcommand s/date () () (run-shell-command "date -Ins" T)) -(defcommand s/dates () () - (run-shell-command "dates" T)) -(defcommand s/local-ip () () - (run-shell-command "ip r" T)) -(defcommand s/mpc-status () () - (run-shell-command "mpc status" T)) ;; key bindings (defparameter *s/key-bindings* (let ((m (make-sparse-keymap))) - ;; mpd - (define-key m (kbd "t") "exec mpc seek -10") - (define-key m (kbd "n") "exec mpc seek +10") - (define-key m (kbd "s") "s/mpc-status") ;; emacs client (define-key m (kbd "e") "exec ec") - ;; term without screen - (define-key m (kbd "t") "exec st") - ;; browser (define-key m (kbd "c") "exec chrm") ;; stump commands (define-key m (kbd "r") "renumber") - (define-key m (kbd "a") "s/dates") - (define-key m (kbd "i") "s/local-ip") m)) ;; root map (define-key *root-map* (kbd ".") '*s/key-bindings*) -(define-key *root-map* (kbd "c") "exec st -e screen") +(define-key *root-map* (kbd "c") "exec st -e tmux") ;; top map -(define-key *top-map* (kbd "XF86ScreenSaver") - "exec i3lock -c 000000 -f -e") - +(define-key *top-map* (kbd "XF86ScreenSaver") "exec slock") (define-key *top-map* (kbd "XF86AudioPlay") "exec mpc toggle") (define-key *top-map* (kbd "XF86AudioNext") "exec mpc next") (define-key *top-map* (kbd "XF86AudioPrev") "exec mpc prev")