23 lines
819 B
Text
23 lines
819 B
Text
;; -*- mode: sawfish; eval: (git-auto-commit-mode 1); -*-
|
|
(define oni:extended-keymap (make-keymap))
|
|
(define oni:window-management-keymap (make-keymap))
|
|
|
|
(setq user-apps-menu
|
|
'(("Emacs" (system "emacsclient -c &"))
|
|
("Terminal" (system "urxvt &"))))
|
|
|
|
(bind-keys oni:window-management-keymap
|
|
"M" 'maximize-window)
|
|
|
|
(bind-keys oni:extended-keymap
|
|
"w" oni:window-management-keymap)
|
|
|
|
;; (ungrab-keymap global-keymap)
|
|
(bind-keys global-keymap
|
|
"C-M-l" '(run-shell-command "i3lock -c \"#000000\"")
|
|
"Super-e" '(run-shell-command (getenv "EDITOR"))
|
|
"Super-w" '(run-shell-command (getenv "BROWSER"))
|
|
"Super-c" '(run-shell-command "urxvt")
|
|
"Super-TAB" 'cycle-windows
|
|
"Super-x" oni:extended-keymap)
|
|
;; (grab-keymap global-keymap)
|