開いているファイルを全部読み込みなおす - わからん

svn up したあと，開いているバッファを読み込み直すのが面倒だったので，全部まとめて再読み込みする関数をいいかげんに書きました。大胆な挙動なので注意して下さい。突っ込みはいらぬ。 (defun zenbu-f5 () (interactive) (mapcar (lambda (buf) (ignore-errors (with-current-buffer buf (revert-buffer nil t)))) (mapcar 'buffer-name (buffer-list))) (message "終わった")) (global-set-key [f5] 'zenbu-f5)