aboutsummaryrefslogtreecommitdiffstats
path: root/lisp
diff options
context:
space:
mode:
authorRichard M. Stallman <[email protected]>1993-05-13 12:05:52 +0000
committerRichard M. Stallman <[email protected]>1993-05-13 12:05:52 +0000
commit36bed8bc8c065de1d27b73cb03222db46da6b43f (patch)
tree534cd150e29fd8c11050d6e9a1dc7a15acad7bd4 /lisp
parent41e7816ac50663250b6ff4bc16d8b95a214bbc73 (diff)
(vc-version-diff): Don't move point in current buffer.
Diffstat (limited to 'lisp')
-rw-r--r--lisp/vc.el12
1 files changed, 3 insertions, 9 deletions
diff --git a/lisp/vc.el b/lisp/vc.el
index 6073ebe86d..2b7df01e99 100644
--- a/lisp/vc.el
+++ b/lisp/vc.el
@@ -775,15 +775,9 @@ files in or below it."
(goto-char (point-min))
(set-buffer-modified-p nil)
)
- (progn
- (vc-backend-diff file rel1 rel2)
- (goto-char (point-min))
- (if (equal (point-min) (point-max))
- (message "No changes to %s between %s and %s." file rel1 rel2)
- (pop-to-buffer "*vc*")
- (goto-char (point-min))
- )
- )
+ (if (zerop (vc-backend-diff file rel1 rel2))
+ (message "No changes to %s between %s and %s." file rel1 rel2)
+ (pop-to-buffer "*vc*")
)
)