From: Stefan Monnier <monnier@iro.umontreal.ca>
Date: Tue, 23 Oct 2012 18:40:23 +0000 (-0400)
Subject: * lisp/vc/diff-mode.el (diff-hunk): `save-excursion' while refining.
X-Git-Tag: emacs-24.2.90~209^2~101
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=9c3e39f3ff724fdd0e622a8fde608e6346991346;p=emacs.git

* lisp/vc/diff-mode.el (diff-hunk): `save-excursion' while refining.

Fixes: debbugs:12671
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 2d3bd095278..05b7cfc176e 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2012-10-23  Stefan Monnier  <monnier@iro.umontreal.ca>
+
+	* vc/diff-mode.el (diff-hunk): `save-excursion' while refining
+	(bug#12671).
+
 2012-10-23  Glenn Morris  <rgm@gnu.org>
 
 	* progmodes/gud.el (gud-menu-map):
diff --git a/lisp/vc/diff-mode.el b/lisp/vc/diff-mode.el
index 0e79c962b47..cdcc7ca4745 100644
--- a/lisp/vc/diff-mode.el
+++ b/lisp/vc/diff-mode.el
@@ -581,8 +581,9 @@ next hunk if TRY-HARDER is non-nil; otherwise signal an error."
                       (with-local-quit
                         (when (buffer-live-p buffer)
                           (with-current-buffer buffer
-                            (goto-char point)
-                            (diff-refine-hunk))))))))))
+                            (save-excursion
+                              (goto-char point)
+                              (diff-refine-hunk)))))))))))
 
 (easy-mmode-define-navigation
  diff-file diff-file-header-re "file" diff-end-of-file)