« MacOS Xでldd | Main | ま・じ・で・す・か »

2005年11月28日

自動的にScreenを作りたい?

[ カテゴリ: Emacsen ]

ElScreen的な話。

<prefix> C-nとか<prefix> C-pで移動しようとしたときに、 Screenが1枚しかなければ自動で作りたい、 というひとが世の中に少なくともふたりはいるみたい。 ということは、他にもいるのかなあ。

個人的にはやっぱり変則的でちょっと気持ち悪いので、 結局本体には取り込まなかったんだけど、 こういうのをどっかに書いておくといいかもしれないです。

(defmacro elscreen-create-automatically (ad-do-it)
  (` (if (not (elscreen-one-screen-p))
	 (, ad-do-it)
       (elscreen-create)
       (elscreen-notify-screen-modification 'force-immediately)
       (elscreen-message "New screen is automatically created"))))

(defadvice elscreen-next (around elscreen-create-automatically activate)
  (elscreen-create-automatically ad-do-it))

(defadvice elscreen-previous (around elscreen-create-automatically activate)
  (elscreen-create-automatically ad-do-it))

(defadvice elscreen-toggle (around elscreen-create-automatically activate)
  (elscreen-create-automatically ad-do-it))

Comments

Post a comment




Remember Me?