diff options
| -rw-r--r-- | ravi-init-appearance.el | 18 |
1 files changed, 10 insertions, 8 deletions
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) |