emacsのクソ便利な分割コマンド

いつかどこからか拾ったもの。クソ便利。今更emacsかよかとは思いますが、
慣れると脳に直結するキーバインドとanything/helmと複数フレーム、複数バッファの組み合わせは未だにかなりイケてるとおもうのです。

;; window分割/移動
(defun other-window-or-split ()
  (interactive)
  (when (one-window-p)
    (split-window-horizontally))
  (other-window 1))
(setq pc-select-selection-keys-only -1)

(global-set-key (kbd "C-]") 'other-window-or-split)