Compare commits

...

3 Commits

1 changed files with 8 additions and 12 deletions

View File

@ -30,11 +30,6 @@
(gnewbg "music")
(gnewbg "winkel"))
;; border width
(setf *maxsize-border-width* 3)
(setf *transient-border-width* 3)
(setf *normal-border-width* 3)
;; border style
(setf *window-border-style* :tight)
(set-focus-color "#b00045")
@ -88,7 +83,7 @@
;; Gaps
(load-module "swm-gaps")
(setf swm-gaps:*inner-gaps-size* 5
swm-gaps:*outer-gaps-size* 5
swm-gaps:*outer-gaps-size* 10
swm-gaps:*head-gaps-size* 0)
(when *initializing*
(swm-gaps:toggle-gaps))
@ -108,12 +103,13 @@
(define-key *root-map* (kbd "m") (concatenate 'string "exec " *music-player*))
;;; bind keys for changing workspace
(define-key *top-map* (kbd "s-1") "change-workspace web")
(define-key *top-map* (kbd "s-2") "change-workspace emacs")
(define-key *top-map* (kbd "s-3") "change-workspace work")
(define-key *top-map* (kbd "s-4") "change-workspace misc")
(define-key *top-map* (kbd "s-9") "change-workspace music")
(define-key *top-map* (kbd "s-0") "change-workspace winkel")
(define-key *top-map* (kbd "s-1") "gselect web")
(define-key *top-map* (kbd "s-2") "gselect emacs")
(define-key *top-map* (kbd "s-3") "gselect work")
(define-key *top-map* (kbd "s-4") "gselect misc")
(define-key *top-map* (kbd "s-9") "gselect music")
(define-key *top-map* (kbd "s-0") "gselect winkel")
(define-key *top-map* (kbd "s-p") "gother")
;; bind keys for moving the current window to another workspace
(define-key *top-map* (kbd "s-C-1") "gmove web")