From a5f22374cd818d6a1a681ef1d463317624820a15 Mon Sep 17 00:00:00 2001 From: Ravi R Kiran Date: Sun, 14 Dec 2014 20:01:39 -0800 Subject: Make split window even more useful: switch to next buffer diff --git a/ravi-init-appearance.el b/ravi-init-appearance.el index 24c2e9a..e847d73 100644 --- a/ravi-init-appearance.el +++ b/ravi-init-appearance.el @@ -231,16 +231,18 @@ Delete all whitespace on a successive key press." :ensure t ) -(defun ravi/split-window-vertically-and-switch () - (interactive) - (split-window-vertically) - (other-window 1)) +(defun ravi/split-window-vertically-and-switch (prefix) + (interactive "P") + (split-window-vertically (if (consp prefix) nil prefix)) + (other-window 1) + (unless (consp prefix) (switch-to-next-buffer))) (bind-key "C-x 2" 'ravi/split-window-vertically-and-switch) -(defun ravi/split-window-horizontally-and-switch () - (interactive) - (split-window-horizontally) - (other-window 1)) +(defun ravi/split-window-horizontally-and-switch (prefix) + (interactive "P") + (split-window-horizontally (if (consp prefix) nil prefix)) + (other-window 1) + (unless (consp prefix) (switch-to-next-buffer))) (bind-key "C-x 3" 'ravi/split-window-horizontally-and-switch) (provide 'ravi-init-appearance) -- cgit v0.10.1