ryuslash/legacy-dotfiles
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

.sawfish/rc

Browse source
This commit is contained in:
Tom Willemsen 2012-06-20 09:29:30 +02:00
parent 539e5a7853
commit a32d5d0041
1 changed files with 9 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

10
.sawfish/rc
View file

@ -1,13 +1,21 @@
;; -*- mode: sawfish; eval: (git-auto-commit-mode 1); -*- ;; -*- mode: sawfish; eval: (git-auto-commit-mode 1); -*-
(define oni:extended-keymap (make-keymap)) (define oni:extended-keymap (make-keymap))
(define oni:window-management-keymap (make-keymap)) (define oni:window-management-keymap (make-keymap))
(define oni:window-packing-keymap (make-keymap))
(setq user-apps-menu (setq user-apps-menu
'(("Emacs" (system "emacsclient -c &")) '(("Emacs" (system "emacsclient -c &"))
("Terminal" (system "urxvt &")))) ("Terminal" (system "urxvt &"))))
(bind-keys oni:window-packing-keymap
"p" 'pack-window-up
"n" 'pack-window-down
"b" 'pack-window-left
"f" 'pack-window-right)
(bind-keys oni:window-management-keymap (bind-keys oni:window-management-keymap
"M" 'maximize-window) "M" 'maximize-window
"p" oni:window-packing-keymap)
(bind-keys oni:extended-keymap (bind-keys oni:extended-keymap
"w" oni:window-management-keymap) "w" oni:window-management-keymap)