Emacs: split into multiple windows vertically

Emacs: split into multiple windows vertically

In standard Emacs, pressing C-x 3 will call function split-window-right to
split the current window into two identical windows.

Sometimes I want to get more than two windows, so I wrote this little function:

(defun wenshan-split-window-vertical (&optional wenshan-number)
  "Split the current window into `wenshan-number' windows and
balance all windows"
  (interactive "P")
  (setq wenshan-number (if wenshan-number
                           (prefix-numeric-value wenshan-number)
  (while (> wenshan-number 1)
    (setq wenshan-number (- wenshan-number 1)))

It calls split-window-right multiple times to get multiple new windows and
finally calls balance-window to adjust the sizes of all windows.

eval this function, then you could press M-x wenshan-split-window-vertical
(thanks to the auto-completion functionality, you won’t need to type all these
characters) to call it. By default, it creates two windows, if you need to get
more than two (as the original purpose of this function), you could type:

M-5 M-x wenshan-split-window-vertial

Happy Hacking!

Date: 2013-05-09

Author: 任文山 (Ren Wenshan)

Org version 7.9.3d with Emacs version 24

Validate XHTML 1.0