Using EmacsClient with screen

http://www.emacswiki.org/cgi-bin/wiki/EmacsClient#toc6

screen 上で emacsclient を実行したら Emacs の window に切り替え，
編集を終えたら emacscient を実行した window に戻る方法．

- screen の設定
Emacs の window は特定しておきたいので，.screenrc に

screen -t Emacs 1 /usr/bin/emacs

などと書いておく．

- ~/bin/emacs を次の内容で用意

#!/bin/sh
echo $WINDOW >~/tmp/emacsclient-caller
screen -r -X select 1
emacsclient "$1"

- Emacs の設定

(add-hook 'after-init-hook 'server-start)
(add-hook 'server-done-hook
	  (lambda ()
	    (shell-command
	     "screen -r -X select `cat ~/tmp/emacsclient-caller`")))