From 9f748a354fa98c0d5550485b694984352c0cf24a Mon Sep 17 00:00:00 2001
From: "Richard M. Stallman" <rms@gnu.org>
Date: Mon, 26 Aug 1996 15:21:57 +0000
Subject: [PATCH] (diff): Don't pop to *diff* buffer.  Change bogus
 unwind-protect to save-excursion.

---
 lisp/diff.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lisp/diff.el b/lisp/diff.el
index 4e8f829fdaf..2ec0a8b14bd 100644
--- a/lisp/diff.el
+++ b/lisp/diff.el
@@ -197,7 +197,7 @@ With prefix arg, prompt for diff switches."
   (let ((old-alt (file-local-copy old))
 	(new-alt (file-local-copy new))
 	buf)
-    (unwind-protect
+    (save-excursion
 	(let ((command
 	       (mapconcat 'identity
 			  (append (list diff-command)
@@ -220,7 +220,7 @@ With prefix arg, prompt for diff switches."
 		(compile-internal command
 				  "No more differences" "Diff"
 				  'diff-parse-differences))
-	  (pop-to-buffer buf)
+	  (set-buffer buf)
 	  ;; Avoid frightening people with "abnormally terminated"
 	  ;; if diff finds differences.
 	  (set (make-local-variable 'compilation-exit-message-function)
-- 
2.39.2