J'aime emacs !

J'utilise emacs tous les jours. Une chose que je fais est éditer fichiers de logiciel. J'applique une rustine, mais si elle ne s'applique bien, j'ai un fichier qui se termine avec ".rej". Comme le éditer ? J'ouvre le fichier original et fait M-x ab-open-rej. Ainsi je peux voir le fichier original et les erreurs de refus. J'utilise ce extrait de emacs-lisp:

(defun ab-open-rej ()
(interactive)
(let* ((this-buffer (buffer-file-name))
     (rej-buffer (concat this-buffer ".rej")))
(delete-other-windows)
(split-window)
(find-file rej-buffer)
(revert-buffer t t)))

Et voilà. Je vois tout.