Mercurial > emacs

changeset 15932:e4d0cf418b2b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(diff): Don't pop to *diff* buffer. Change bogus unwind-protect to save-excursion.
author Richard M. Stallman <rms@gnu.org>
date Mon, 26 Aug 1996 15:21:57 +0000
parents c729af982039
children 9df952241adc
files lisp/diff.el
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/diff.el	Mon Aug 26 15:15:02 1996 +0000
+++ b/lisp/diff.el	Mon Aug 26 15:21:57 1996 +0000
@@ -197,7 +197,7 @@
   (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 @@
 		(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)