From d9cae60fa5048abd3528f96a285109329639fda6 Mon Sep 17 00:00:00 2001 From: Kyle Meyer Date: Fri, 23 Jan 2015 23:23:05 -0500 Subject: Improve organization and consistency of files - Add pages and more headings for large files. - Try to use consistent order for file (or page) structure. * Loading * Settings * Hooks * Any mode activation or function calls * My functions * Key bindings --- lisp/init-framewin.el | 19 +++++++++---------- 1 file changed, 9 insertions(+), 10 deletions(-) (limited to 'lisp/init-framewin.el') diff --git a/lisp/init-framewin.el b/lisp/init-framewin.el index 2425562..ebe818b 100644 --- a/lisp/init-framewin.el +++ b/lisp/init-framewin.el @@ -1,5 +1,10 @@ ;;; Frames and windows +(defadvice clone-indirect-buffer-other-window + (after clone-indirect-and-widen activate) + "Widen after cloning an indirect buffer." + (widen)) + ;; From prelude (defun km/swap-windows () "Swap 2 windows." @@ -32,19 +37,13 @@ Assumes that the window is only split into two." (split-window-vertically)) (switch-to-buffer nil))) +(global-set-key (kbd "M-o") 'scroll-other-window) + (define-prefix-command 'km/window-map) (global-set-key (kbd "C-c w") 'km/window-map) -(define-key km/window-map "s" 'km/swap-windows) -(define-key km/window-map "l" 'km/switch-window-split) - (define-key km/window-map "f" 'make-frame) - -(global-set-key (kbd "M-o") 'scroll-other-window) - -(defadvice clone-indirect-buffer-other-window - (after clone-indirect-and-widen activate) - "Widen after cloning an indirect buffer." - (widen)) +(define-key km/window-map "l" 'km/switch-window-split) +(define-key km/window-map "s" 'km/swap-windows) (provide 'init-framewin) -- cgit v1.2.3