MeadowをSDIっぽく使う(追加)

(defvar sdi-other-window-always-through-frames nil)

(defun sdi-other-window (arg)
  (interactive "P")
  (if (or sdi-other-window-always-through-frames
          (window-single-p (selected-window)))
      (progn
        (other-window (prefix-numeric-value arg) t)
        (raise-frame))
    (call-interactively 'other-window)))

(global-set-key "\C-xo" 'sdi-other-window)

しばらく使ってみて、SDIっぽいMeadowもなかなか便利だと思った。