diff options
| author | Kyle Meyer <kyle@kyleam.com> | 2015-01-26 01:09:01 -0500 |
|---|---|---|
| committer | Kyle Meyer <kyle@kyleam.com> | 2015-01-27 01:01:05 -0500 |
| commit | 804e7cbad0715d4b1f7a352ced16350e0d7da2d1 (patch) | |
| tree | 386110d2911bb9ebb0b2fad160b0283c6a62426b | |
| parent | bab1cea4888f87ed3e96d6dac935a42e21683679 (diff) | |
| download | emacs.d-804e7cbad0715d4b1f7a352ced16350e0d7da2d1.tar.gz | |
Don't advise clone-indirect-buffer-other-window
| -rw-r--r-- | lisp/init-framewin.el | 11 |
1 files changed, 7 insertions, 4 deletions
diff --git a/lisp/init-framewin.el b/lisp/init-framewin.el index ebe818b..47ff1e1 100644 --- a/lisp/init-framewin.el +++ b/lisp/init-framewin.el @@ -1,9 +1,10 @@ ;;; Frames and windows -(defadvice clone-indirect-buffer-other-window - (after clone-indirect-and-widen activate) - "Widen after cloning an indirect buffer." - (widen)) +(defun km/clone-indirect-buffer-other-window-and-widen () + "Clone as indirect buffer and then widen." + (interactive) + (call-interactively #'clone-indirect-buffer-other-window) + (widen)) ;; From prelude (defun km/swap-windows () @@ -46,4 +47,6 @@ Assumes that the window is only split into two." (define-key km/window-map "l" 'km/switch-window-split) (define-key km/window-map "s" 'km/swap-windows) +(define-key ctl-x-4-map "c" 'km/clone-indirect-buffer-other-window-and-widen) + (provide 'init-framewin) |