突然思い立ってこんな関数を書いてみたら、とりあえずそれっぽくはなった。 ;;; Emacs SDI (require 'cl) ;; remove-duplicates (defun window-single-p (win) (eq win (next-window win))) (defun frame-single-p (frame) (eq frame (next-frame frame))) (…