;; Configuration file for Stumpwm.


(in-package :stumpwm)


;;; MODE LINE

;; Display mode line at the bottom of the screen.
(setf *mode-line-position* :bottom)
;; Display mode line and allow loading of stumpwmrc multiple times. Thanks to
;; http://prael.wordpress.com/stumpwmrc/ and
;; http://hcl-club.lu/svn/development/lisp/.stumpwmrc
(if (not (head-mode-line (current-head)))
     (toggle-mode-line (current-screen) (current-head)))


;;; KEY MAPPINGS

;; Remove bindings to kill a window. Too dangerous for a Vim user.
(undefine-key *group-root-map* (kbd "k"))
(undefine-key *group-root-map* (kbd "C-k"))
(undefine-key *group-root-map* (kbd "K"))

;; vim: ft=lisp