StumpWM configuration on the X1 Carbon

.stumpwmrc

(load-module "battery-portable")
(setf *screen-mode-line-format* "%B [%n] %w")
;;(setf *screen-mode-line-format*
;;      (list "[%n] %w | "
;;            '(:eval (run-shell-command "date" t))))
(toggle-mode-line (current-screen) (current-head))

;; Caps -> Ctrl on machines that don't do it by default
;;(run-shell-command "xmodmap -e 'clear Lock' -e 'add control = Caps_Lock'")

;; THIS IS INSANE - On the X1, remap the capslock keycode instead.
(run-shell-command "xmodmap -e 'keycode 66 = Control_L' -e 'clear Lock' -e 'add control = Control_L'")

;;(run-shell-command "xinput set-prop 10 145 0")

;; Disable the trackpad on the X1
(run-shell-command "xinput disable 11")

;; Set a WMName under stump so Java6 applications work
(run-shell-command "wmname LG3D")

;; Start the emacs daemon for easy access
;;(run-shell-command "emacs --daemon")