.sawfish/rc

This commit is contained in:
Tom Willemsen 2012-06-19 09:35:02 +02:00
parent 0c1b46579f
commit 539e5a7853

View file

@ -6,16 +6,18 @@
'(("Emacs" (system "emacsclient -c &")) '(("Emacs" (system "emacsclient -c &"))
("Terminal" (system "urxvt &")))) ("Terminal" (system "urxvt &"))))
(bind-keys window-management-keymap (bind-keys oni:window-management-keymap
"M" 'maximize-window) "M" 'maximize-window)
(bind-keys oni:extended-keymap (bind-keys oni:extended-keymap
"w" 'oni:window-management-keymap) "w" oni:window-management-keymap)
;; (ungrab-keymap global-keymap)
(bind-keys global-keymap (bind-keys global-keymap
"C-M-l" '(run-shell-command "i3lock -c \"#000000\"") "C-M-l" '(run-shell-command "i3lock -c \"#000000\"")
"Super-e" '(run-shell-command (getenv "EDITOR")) "Super-e" '(run-shell-command (getenv "EDITOR"))
"Super-w" '(run-shell-command (getenv "BROWSER")) "Super-w" '(run-shell-command (getenv "BROWSER"))
"Super-c" '(run-shell-command "urxvt") "Super-c" '(run-shell-command "urxvt")
"Super-TAB" 'cycle-windows "Super-TAB" 'cycle-windows
"Super-x" 'oni:extended-keymap) "Super-x" oni:extended-keymap)
;; (grab-keymap global-keymap)