diff options
| author | Ravi R Kiran <aine.marina@gmail.com> | 2014-12-15 04:01:39 (GMT) |
|---|---|---|
| committer | Ravi R Kiran <aine.marina@gmail.com> | 2014-12-15 04:01:39 (GMT) |
| commit | a5f22374cd818d6a1a681ef1d463317624820a15 (patch) | |
| tree | 8506b168b470dbc10105cb7a998cf8020db2ea6e /ravi-init-appearance.el | |
| parent | 92016421ef6d1ca263eb595d372e1c1f79517bfa (diff) | |
| download | dotemacs-a5f22374cd818d6a1a681ef1d463317624820a15.zip dotemacs-a5f22374cd818d6a1a681ef1d463317624820a15.tar.gz dotemacs-a5f22374cd818d6a1a681ef1d463317624820a15.tar.bz2 | |
Make split window even more useful: switch to next buffer
Diffstat (limited to 'ravi-init-appearance.el')
| -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) |